VALIDA DATA

NILTON.VIANNA 25/08/2010 11:44:24
#351204
Existe alguma forma de validar tipo quando é formatado o micro
ele vem como padrao 1/5/2010 (opções reginais)
pois bem ao entrar no sistema verifica se a data estiver no formato 1/5/2010
msgbox = [Ô]Data Formato Invalido[Ô]
depois que o cliente acerta a data tipo 01/05/2010
ok, desconsiderar essa msg.

mais ou menos assim:
If date <> Format(date, [Ô]dd/mm/yyyy[Ô]) then
msgbox = [Ô]Data Formato Invalido[Ô]
end if

grato
Nilton
ICHIHARA 25/08/2010 11:59:15
#351210
Uma maneira que pode quebrar o galho é a seguinte:

if len(date) < 10 then
msgbox [Ô]formato de data invalido[Ô]
endif

abrs
MSMJUDAS 25/08/2010 12:05:55
#351214
If IsDate(CAMPO) = False Then
MsgBox [Ô]Data inválida![Ô], vbCritical, [Ô]Aviso[Ô]
End IF
TECLA 25/08/2010 13:21:03
#351228
Citação:

:
If IsDate(CAMPO) = False Then
MsgBox [Ô]Data inválida![Ô], vbCritical, [Ô]Aviso[Ô]
End IF


Os IsDate é um pouco problemático.
Tópico encerrado , respostas não são mais permitidas
Voltar