| Usuario |
VValidar un textbox |
Desconocido
|
| Enviado - 18/8/2004 |
| |
Necesito saber como validar un textbox, permitir la entrada solamente de números. Si son letras, que entregue un mensaje. Gracias.
|
| |
|
nostromo
389 Mensaje(s)
|
| Enviado - 18/8/2004 |
| |
Hola;
Validar números enteros:
Private Sub txtEntrada_KeyPress( etc)
Dim c As Integer
for c=33 to 47
If KeyAscii = c or KeyAscii > 57 Then
KeyAscii = 0
End If
Next c
End Sub
Validar números decimales:
Private Sub txtEntrada_KeyPress( etc)
Dim c As Integer
for c=33 to 45
If KeyAscii = c Or KeyAscii = 47 Or KeyAscii > 57 Then
KeyAscii = 0
End If
Next c
End Sub
Nos vemos |
| |
|
Desconocido
|
| Enviado - 18/8/2004 |
| |
Tienes que hacerlo en el evento keypress de la caja de texto, simplemente tienes que controlar los ascii que son numeros y si se sale de ese rango mostrar un msgbox.
Suerte!! |
| |
|
|
|
