title image


Smiley Re: Richtextbox: Zeilen-Anzahl bestimmen
Hallo, versuch´s mal hiermit:

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

 

Const EM_GETLINECOUNT = &HBA

 

Private Sub Command1_Click()

MsgBox SendMessage(RichTextBox1.hWnd, EM_GETLINECOUNT, 0, 0)

End Sub

 

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: