|
|
|
![](images/pasta_topo.gif)
|
![](images/folha.gif)
|
Dicas
|
![](images/folha_fim.gif)
|
Visual Basic (Validações)
|
|
![](images/box01esqsup.gif) |
Título da Dica: Somente número em um TextBox
|
![](images/box01dirsup.gif) |
|
|
Postada em 17/9/2001 por Douglas Matheus
douglasmc@domprocessamento.com.br
Private Sub Text1_KeyPress(KeyAscii As Integer) If (Chr(KeyAscii) < "0" Or Chr(KeyAscii) > "9") And KeyAscii <> 8 Then KeyAscii = 0
End Sub
|
|
|
|
![](images/hosted.gif)
|