
28/11/2003, 11:02
|
 | | | Fecha de Ingreso: noviembre-2003
Mensajes: 418
Antigüedad: 21 años, 6 meses Puntos: 0 | |
ok, es realmente muy simple, yo hice una función con estas constantes:
Const eNumero = "1234567890"
Const eTextoMi = "abcdefghijklmnopqrstuvwxyzñáéíóú"
Const eTextoMa = "ABCDEFGHIJKLMNOPQRTSUVWXYZÑ"
Const eSimbolo = "/*-+=_][{}\|';:.,?!@#$%^&()`~<>"
Const eMoneda = "1234567890."
a la función le paso como referencia el KeyAscii del evento KeyPress del control y que formato quiero (numero, texto min, texto mayusc, etc) verifico un INSTR si el chr(keyascii) este en la constante, sino seteo keyascii=0.
ojo tenes que tener en cuenta que si el keyascii es igual a 8, 13 o 27 no haga nada (borrar, enter, esc).
espero te sea util. saludos.
__________________ La cantidad total de inteligencia del planeta permanece constante.
La población, sin embargo, sigue aumentando. COLE :cool: Los ordenadores no resuelven problemas ... ejecutan soluciones.Laurent Gasser Tienes alguna duda :pensando: ? >>> www.google.com :aplauso: <<< |