Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
En tu modulo pon esto: Public Function SoloLetras(ByVal KeyAscii As Integer) As Integer If InStr("abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ", Chr(KeyAscii)) = 0 Then SoloLetras = 0 Else SoloLetras = KeyAscii End If If KeyAscii = 8 Then SoloLetras = KeyAscii ' borrado atras If KeyAscii = 13 Then SoloLetras = KeyAscii ' return End Function
Y en el evento keyPress de la Caja de Texto esto: KeyAscii = SoloLetras(KeyAscii)
Valora esta respuesta
0
Comentar
RE:como valido que solo entren letras en un textbo