
16/09/2009, 13:37
|
| | Fecha de Ingreso: junio-2008
Mensajes: 343
Antigüedad: 16 años, 9 meses Puntos: 4 | |
Explicar los parametros de esta API sendmessage 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
|