Hola a todos, les agredezco mucho sus repuestas pero...
estuve tan ocupada ke olvide revisar en internet las respuesas, sin embargo encontre otra solucion, pues solo hice funciones en un modulo y cuando valido solo las llamo a cada una de ellas.
Public Function Numeros(KeyAscii As Integer)
If (KeyAscii < 48 Or KeyAscii > 57) And KeyAscii <> 13 Then KeyAscii = 0
End Function
Public Function Letras(KeyAscii As Integer)
If (KeyAscii < 65 Or KeyAscii > 90) And (KeyAscii < 97 Or KeyAscii > 122) And KeyAscii <> 8 And KeyAscii <> 32 And KeyAscii <> 13 Then KeyAscii = 0
End Function
Bueno solo eso kiero agregar, gracias por todos
Mostrar Mensajes
.
