Visual Basic - CULTURA GENERAL

En ocasiones preguntaban como contar el numero de lineas de un TEXTBOX Multiline notaba que recomendaban el RICHTEXTBOX, pero aqui esta la forma de como contar el numero de linea en un TEXTBOX comun y corriente.............. es simplemente un consejo:

Dim EM_GETLINECOUNT As Long


EM_GETLINECOUNT = &HBA

rc = SendMessage(Text1.hWnd, EM_GETLINECOUNT, 0, 0)

MsgBox rc

Atte.
Eduardo
Caracas-Vzla

Disculpen pero se me olvido poner las declaraciones..........

Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Long) As Long

dim rc As String

Listo..
Atte
Eduardo
Caracas-Vzla

de cultura general: uno y uno y uno son dos, no más de tres, y si no te lo crees usa vbacalculatorplusmachineV1_99998.dll y verás como me da la razón aproximadamente.Por el bien de la humanidad: ---->Learn to code seriously

ASM4EVER