/ Snippet Library - View Code

Visual Basic / API / Counting total lines

Snippet details

ID: 230

Viewed: 1292

Added: 2002-05-28

Version:

Snippets in this catagory
Show Printable Version

This will count the total number of lines in a text box not dependent on vbCrLf's (hard returns)

General Details

Snippet uploaded by: snippet

Email : webmaster@snippetlibrary.com

Snippet By: unknown

Snippet By:	unknown
Declarations
Highlight AllPrivate Declare Function SendMessage Lib "user32" _ Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As _ Long, ByVal wParam As Long, lParam As Any) As Long Private Const EM_GETLINECOUNT = &HBA
Code
Highlight AllPrivate Sub Command1_Click() MsgBox SendMessage(Text1.hwnd, EM_GETLINECOUNT, 0&, 0&) End Sub

No Reviews to show