Programación General > Visual Basic 6.0 e inferiores

 Hacer Que Un Text Acepte Solo Numeros

<< < (2/2)

erick185:
Ah se me olvidaba :lol:

Aqui les dejo un code corto, que tambien no permi letras!

Private Sub Text1_KeyPress(KeyAscii As Integer)

    If InStr("0123456789", Chr(KeyAscii)) = 0 And KeyAscii <> 8 Then
        KeyAscii = 0
    End If

End Sub

de ante mano gracias por su aportacion.
 

 Salu2  :hola:

Navegación

[0] Índice de Mensajes

[*] Página Anterior

Ir a la versión completa