• Home
 · 
• Math/Dates
 · 
• Count Number of Lines in a program where u can calculate total number of lines in multiline text bo

Count Number of Lines in a program where u can calculate total number of lines in multiline text bo

Count Number of Lines in a program where u can calculate total number of lines in multiline text box..

Rate Count Number of Lines in a program where u can calculate total number of lines in multiline text bo

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

Private Const EM_GETLINECOUNT = 186

Public Function GetLineCount(ByRef txt As TextBox) As Long
    GetLineCount = SendMessageAsLong(Text1.hWnd, EM_GETLINECOUNT, 0, 0)
End Function

'How can I use this function:
Sub Main()
    Debug.Print GetLineCount(Text1)
    'or
    'label.caption=getlinecount(text1)
End Sub