DATAS

GESSINGER 26/02/2010 23:18:59
#335523
Fala galera, mais uma duvida ai pra vossos senhores ...

Como faço para comparar se uma data digitada numa [Ô]txtData[Ô]
é anterior ou posterior à data do windows ?
DANIKULL 27/02/2010 00:04:37
#335528 Resposta escolhida
GESSINGER, boa noite.

Maninho, segue ai:

If CDate(txtData) < Date Then
    MsgBox [Ô]A data digitada é menor que a data do Windows!![Ô], vbInformation, [Ô]Compara Data[Ô]
ElseIf CDate(txtData) = Date Then
    MsgBox [Ô]A data digitada é igual que a data do Windows!![Ô], vbInformation, [Ô]Compara Data[Ô]
ElseIf CDate(txtData) > Date Then
    MsgBox [Ô]A data digitada é maior que a data do Windows!![Ô], vbInformation, [Ô]Compara Data[Ô]
End If


Até mais...
Tópico encerrado , respostas não são mais permitidas
Voltar