urgente validar campo texto en vbasic6

mveraa · #1 (**permalink**) 19/03/2004, 12:25

hola maestros se me olvido como validar un campo que solo acepte letras no numeros ... ¿alguien tiene un codigo que haga eso ?

muchas gracias...

danlu · #2 (**permalink**) 19/03/2004, 12:49

Hola esto te valida solo numeros
Espero que te sirva
lo haces en el evento keypress de una caja de texto cualquiera...

Private Sub txtPrueba_KeyPress(KeyAscii As Integer)
If Not IsNumeric(Chr(KeyAscii)) And Chr(KeyAscii) <> vbBack Then
KeyAscii = 0
End If
End Sub

pero si deseas solo letras quitale el "<< not >>"
me entiendes o no???
osea
if isnumeric.....

mveraa · #3 (**permalink**) 19/03/2004, 13:20

muchas gracias , muy buena solucion esa.

rafapaskual · #4 (**permalink**) 22/03/2004, 03:10

Hola, otra manera que yo vi por aqui y me gusta mucho es:

if instr("0123456789",cad)<>0 then
keyascii=0
end if

Así puedes hacer una lista de lo que quieres que salga o no. Lo otro tb chuta y es muy útil esto te va mejor si quieres una lista concreta.

Saludos!

rafapaskual · #5 (**permalink**) 22/03/2004, 03:11

Perdon, donde pone cad es chr(keyascii)

ajojara · #6 (**permalink**) 22/03/2004, 04:14

No, es el texto que hay dentro de la caja

ajojara · #7 (**permalink**) 22/03/2004, 04:15

ah, perdón, ya entiendo