SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: Bopo en Jueves 15 de Enero de 2004, 17:38

Título: Como
Publicado por: Bopo en Jueves 15 de Enero de 2004, 17:38

:huh: en un textbox que solo aceeptar  numeros pero no peudo borrar uno con la teclaretroceso o como se llame, el codigo para que acepte solo numeros eseste:

Sub Text1_KeyPress(KeyAscii As Integer)
If InStr("123456789", Chr(KeyAscii)) = 0 Then
KeyAscii = 0
End If
End Sub

pero como le pongo que oueda borrar tb? :P

Título: Re: Como
Publicado por: Brroz en Jueves 15 de Enero de 2004, 17:51

Hola Bopo.

Sub Text1_KeyPress(KeyAscii As Integer)
If InStr("123456789", Chr(KeyAscii)) = 0 and KeyAscii <> 8 Then
KeyAscii = 0
End If
End Sub

Abur.

Título: Re: Como
Publicado por: Bopo en Jueves 15 de Enero de 2004, 17:55

Cita de: "Brroz"

Hola Bopo.

Sub Text1_KeyPress(KeyAscii As Integer)
If InStr("123456789", Chr(KeyAscii)) = 0 and KeyAscii <> 8 Then
KeyAscii = 0
End If
End Sub

Abur.

Gracias ;)