Que significan estos caracteresn tengo idea &HBA y 0&
Código:
Private Declare Function SendMessageLong Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long) As Long
Private Sub Command1_Click()
MsgBox "Hay " & SendMessageLong(RichTextBox1.hwnd, &HBA, 0&, 0&) - 1 & " salto(s) de línea"
End Sub