Hola, tengo un Textbox que:
1. Solo debe aceptar números con rango entre cero y 36 (00-36)
2. Que solo acepte 2 caracteres numéricos
3. Cuando escribe el segundo carácter numérico el foco se me vaya al siguiente texbox sin necesidad de la tecla enter,
4. Si presiona Enter estando el textbox vacio no se mueva.
Me esta funcionando, pero cuando escribe el primer carácter en textbox y borra se me va al siguiente textbox
Este es mi código:
Private Sub TextNumero_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextNumero.KeyPress
If Char.IsNumber(e.KeyChar) Then
e.Handled = False
ElseIf Char.IsControl(e.KeyChar) Then
e.Handled = False
Else
e.Handled = True
End If
If Asc(e.KeyChar) = 13 And (Val(TextNumero.Text) <> 0) Or Len(TextNumero.Text) = 1 Then
TextNumero.BackColor = Color.White
Textmonto.BackColor = Color.Yellow
Textmonto.Focus()
Else
TextNumero.BackColor = Color.Yellow
TextNumero.Focus()
End If
End Sub
Pues eso...espero me den luces...
Saludos
