|
|
|
![](images/pasta_topo.gif)
|
![](images/folha.gif)
|
Dicas
|
![](images/folha_fim.gif)
|
Visual Basic (Validações)
|
|
![](images/box01esqsup.gif) |
Título da Dica: Digitar apenas numeros e vírgulas num TextBox
|
![](images/box01dirsup.gif) |
|
|
Postada em 23/3/2002 por vimieiro
coloque este código no evento Keypress do seu Text :
'Ascii 48 a 57 são numeros 'Ascii 8 é o backspace 'Ascii 44 é a vírgula
Select Case KeyAscii Case 48 To 57, 8, 44 Case Else KeyAscii = 0 End Select
|
|
|
|
![](images/hosted.gif)
|