maybe that can help you :
Code:Private Sub Command1_Click()
For x = 1 To Len(Text1)
If Mid(Text1, x, 1) = " " Then
Text1.SelStart = x
Text1.SelLength = 0
Text1.SetFocus
End If
Next x
End Sub
Printable View
maybe that can help you :
Code:Private Sub Command1_Click()
For x = 1 To Len(Text1)
If Mid(Text1, x, 1) = " " Then
Text1.SelStart = x
Text1.SelLength = 0
Text1.SetFocus
End If
Next x
End Sub
what the @%&* happen here,
you started the post, not me!!
oh well
Hey I need help I got a text box and i need to default the cursor to arrow over 1 space so it is between text i have defaulted there NOT mouse cursor but the blinking cursor what code can I use to do this I am stuck. Any help is greatly appreciated thanks.
Robb
Hehe, I've seen this happen before, very cool :cool:.
:D
i think it's because john sort the thread by date and time!