Vetorial
|
CAIEIRAS
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 24/02/2006 09:52 hs
Bom dia Tenho tres texbox uma para Valor a outra Data e outra para Cep como faco por exemplo no campo valor so aceita-se numeros pontos e virgulas na data so os numeros barras , tracos e parenteses e no cep so numero e traco desde ja Obrigado |
|
|
|
|
|
|
|
Postada em 24/02/2006 10:23 hs
use o maskedit , ele serve para isso |
|
|
|
|
|
Postada em 24/02/2006 10:41 hs
Private Sub txtValor_KeyPress(KeyAscii As Integer) If InStr(1, "0123456789" & Chr(8), Chr(KeyAscii)) = 0 Then KeyAscii = 0 End Sub
Isso vai permitir q vc digite apenas os caracteres q tao no segundo parametro da funcao InStr... Lembra de deixar o Chr(8) para permitir o uso da tecla Backspace... Testa ai...
Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net
e-mail/msn: elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
 "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)
|
|
|
|
