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
![Me gusta: Está pregunta es útil y esta clara Me gusta: Está pregunta es útil y esta clara](/img/img.png?11.51)
![NO me gusta: Está pregunta no esta clara o no es útil No me gusta: Está pregunta no esta clara o no es útil](/img/img.png?11.51)
0