[RESOLVED] total lines in a textbox

[Fromethius]

You can do call Win32 API functions in VB .Net, can you not? I know you can do it in C#.

Imports System.Runtime.InteropServices

Looks like you can o_O

Also looks like all hope is not lost!

[RonR]

I would think the code I used for VB 6 could be converted to VB 2008 XE.


I could write a small program using the function and then run it thru the VB 2008 VB XE converter.

[Fromethius]

Imports System.Runtime.InteropServices
 
Public Class Form1
    Private Const EM_GETLINECOUNT As Integer = &HBA
    Declare Auto Function SendMessage Lib "user32" (ByVal hWnd As IntPtr, ByVal Msg As Integer, ByVal wParam As Integer, ByVal lParam As Integer) As Integer
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim lineCount As Integer = SendMessage(TextBox1.Handle, EM_GETLINECOUNT, 0, 0)
    End Sub
End Class

We win!

[RonR]

thanks!!! it works just like in VB 6.


thanks again!!!