19/07/2010, 13:15
|
 | | | Fecha de Ingreso: julio-2006 Ubicación: Órbita sincrónica
Mensajes: 899
Antigüedad: 18 años, 8 meses Puntos: 29 | |
| Respuesta: Ayuda para manejador de errores
Solo tienes que agregar las teclas que si quieres admitir. Si no son caracteres puedes usar las constantes del VB.
If InStr(1, "0123456789.", Chr(KeyAscii)) = 0 And KeyAscii <> vbKeyBack Then
KeyAscii = 0
MsgBox "Carácter no permitido"
End If
__________________
No hay preguntas tontas, solo gente estup..., ¡No!, ¿como era? No hay gente que pregunte a tontos... ¡Nooo!... ¡Vaya cabeza! |