Rhayezelle
Member
I wonder what's wrong with my code..
: this code works
Private Sub TxtLname_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TxtLname.KeyDown
If e.KeyCode = Keys.Enter Then
If IsNumeric(TxtLname.Text) Then
MsgBox("Invalid Input")
End If
End If
End Sub
: when I replace the keys.enter with "keys.tab" it won't work.. please help me
Private Sub TxtLname_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TxtLname.KeyDown
If e.KeyCode = Keys.tab Then
If IsNumeric(TxtLname.Text) Then
MsgBox("Invalid Input")
End If
End If
End Sub
: this code works
Private Sub TxtLname_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TxtLname.KeyDown
If e.KeyCode = Keys.Enter Then
If IsNumeric(TxtLname.Text) Then
MsgBox("Invalid Input")
End If
End If
End Sub
: when I replace the keys.enter with "keys.tab" it won't work.. please help me
Private Sub TxtLname_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TxtLname.KeyDown
If e.KeyCode = Keys.tab Then
If IsNumeric(TxtLname.Text) Then
MsgBox("Invalid Input")
End If
End If
End Sub