Multiline Textbox

[Millh0u5e]

Okay.. probably another idiot question.. but.. how do I get back to line1 of a multi line Textbox after sending data from it..?

This is how my code works so far:

Private Sub Text1_KeyPress(KeyAscii As Integer)

If (KeyAscii = 13) Then
strVariabe = Text1.Text
Text1.Text = ""
End If

End Sub

However.. after pressing Return and sending the data to strVariable, and clearing the text box.. it always returns to line2 of the box.. while I want the entry point back at the start of the text box.
I hope this makes sense.. it's driving me crazy!!!

[crptcblade]

so you don't want the new line entered, correct?

Private Sub Text1_KeyPress(KeyAscii As Integer) 
 
If (KeyAscii = 13) Then 
strVariabe = Text1.Text 
Text1.Text = ""
KeyAscii = 0
End If 
 
End Sub

[Millh0u5e]

Woohoo!!!

hahaha.. thank you, thank you, thank you!!

You have no idea how much frustration you've saved me from!

::[Millhouse]::