what you mean about position in text at textbox?
please give more information.

Thank your for reply sir..
I mean, when i put cursor (click) in some text i will know where the cursor is.
e.g : Daniweb.
If i put cursor between i and w then i will get cursor position is 4.

Can you help me please.

Thank you.

I mean, when i put cursor (click) in some text i will know where the cursor is.

Okay. See if this helps :

Private Sub Text1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Text1.SelLength = 0 Then
    lCurPos = Text1.SelStart
Else
    lCurPos = Text1.SelStart + Text1.SelLength
End If
Label1.Caption = "Cursor Position " & lCurPos
End Sub
Comments
Good
It worked sir. :D

Okay. See if this helps :

Private Sub Text1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If Text1.SelLength = 0 Then
    lCurPos = Text1.SelStart
Else
    lCurPos = Text1.SelStart + Text1.SelLength
End If
Label1.Caption = "Cursor Position " & lCurPos
End Sub

Wow..It working sir..
Thanks for the solution.

This question has already been answered. Start a new discussion instead.