No mohlo by být:
Private Sub TextBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyCode = Keys.Left Then
MessageBox.Show("Left")
e.Handled = True
ElseIf e.KeyCode = Keys.Right Then
MessageBox.Show("Right")
e.Handled = True
End If
End Sub
nebo e.SuppressKeyPress = True
|