Validación de datos Visual Basic..
Hola, tengo que validar que en una caja de texto no deje introducir números ni caracteres raros, ¿se puede?
Saludos para ti.
Terramar
Saludos para ti.
Terramar
1 Respuesta
Respuesta de fvomaster
1
¿Probemos con esto?
Private Sub Text1_KeyPress(KeyAscii As Integer)
If IsNumeric(Chr(KeyAscii)) Or Not ((KeyAscii >= 65 And KeyAscii <= 90) Or (KeyAscii >= 97 And KeyAscii <= 122)) Then
KeyAscii = 0: Beep
End If
End Sub
Espero que te sirva
Un abrazo.
Master
Private Sub Text1_KeyPress(KeyAscii As Integer)
If IsNumeric(Chr(KeyAscii)) Or Not ((KeyAscii >= 65 And KeyAscii <= 90) Or (KeyAscii >= 97 And KeyAscii <= 122)) Then
KeyAscii = 0: Beep
End If
End Sub
Espero que te sirva
Un abrazo.
Master
