Cita de: UTU en 28 Febrero 2006, 22:27 PM
Con esto solo te permite poner los numeros en el textbox llamado Text1
--------------------------------------------------------------------------
Private Sub Text1_KeyPress(KeyAscii As Integer)
If InStr("0123456789", Chr(KeyAscii)) = 0 And KeyAscii <> 8 Then
KeyAscii = 0
End If
End Sub
--------------------------------------------------------------------------
y si quiero que kontenga solo letras y numeros nada mas.. debo hacerlo de esta forma??
Private Sub Text1_KeyPress(KeyAscii As Integer)
If InStr("0123456789abcdefghiJKLM...etc", Chr(KeyAscii)) = 0 And KeyAscii <> 8 Then
KeyAscii = 0
End If
End Sub
?? Salu2

! Graxias !
.. Pues tengo un texbox con algun texto...
...
... pues no dio resultado... alguien tiene idea de como? Graxx salu2