VIRGULA

MARVB6 21/01/2005 08:44:12
#62125
Olá galera, tenho um linha de código no Keypress que não deixa os usuários digitares letras, no campo que só quero números, mas isso tb não está deixando ele digitar virgula, alguém sabe como faço pra permitir isso ?
O código que estou usando é esse : If KeyAscii <> 8 And KeyAscii < 48 Or KeyAscii > 57 Then KeyAscii = 0

Valeu ...
JB207 21/01/2005 08:51:08
#62129
Resposta escolhida
Tente Isso

If KeyAscii = vbKeyBack Then Exit Sub
If KeyAscii = vbKeySnapshot Then Exit Sub
If KeyAscii = 44 Or KeyAscii = 46 Then Exit Sub

If KeyAscii < 48 Or KeyAscii > 58 Then
KeyAscii = 0
Exit Sub
End If

Isso deve ajudar
MARVB6 21/01/2005 08:57:19
#62133
Cara ....na mosca ...
Muito Obrigado pela força ...
Tópico encerrado , respostas não são mais permitidas