CANCELAR TEXTO EM TEXTBOX

USUARIO.EXCLUIDOS 07/05/2004 11:46:09
#23474
Pessoal, e possivel fazer com que seja permitido apenas numeros em um TextBox?

Vlw, abracos, Alex.
USUARIO.EXCLUIDOS 09/05/2004 14:59:17
#23787 Resposta escolhida
poxa...

pq não faz assim:

Private Sub Text1_KeyPress(KeyAscii As Integer)
If Not Chr(KeyAscii) Like "[0-9]" Then
KeyAscii = 0
End If
End Sub


se vc quiser colocar enter, tab...

Private Sub Text1_KeyPress(KeyAscii As Integer)
if keyascii = 13 then 'ENTER
exit sub
endif

If Not Chr(KeyAscii) Like "[0-9]" Then
KeyAscii = 0
End If
End Sub



Falow!!
Tópico encerrado , respostas não são mais permitidas
Voltar