campos solo numericos
Publicado por Racsus (40 intervenciones) el 22/05/2003 11:49:50
Hola
tengo varios campos en un formulario en los que quiero que el usuario sólo pueda escribir numeros. Para ello utilizo la siguiente funcion en el evento "al pulsar una tecla"
Ej:
Private Sub zonaHasta_KeyPress(KeyAscii As Integer)
numeros (KeyAscii)
End Sub
Private Sub numeros(CODIGO As Integer)
Select Case Chr(CODIGO)
Case "0" To "9"
Case Chr(8)
Case Else
CODIGO = 0
End Select
End Sub
Porque en unos campos no me deja escribir letras y en otros si, si todos llaman a la misma función ? no lo entiendo
gracias
tengo varios campos en un formulario en los que quiero que el usuario sólo pueda escribir numeros. Para ello utilizo la siguiente funcion en el evento "al pulsar una tecla"
Ej:
Private Sub zonaHasta_KeyPress(KeyAscii As Integer)
numeros (KeyAscii)
End Sub
Private Sub numeros(CODIGO As Integer)
Select Case Chr(CODIGO)
Case "0" To "9"
Case Chr(8)
Case Else
CODIGO = 0
End Select
End Sub
Porque en unos campos no me deja escribir letras y en otros si, si todos llaman a la misma función ? no lo entiendo
gracias
Valora esta pregunta


0