Zavisi sta ti treba.
Najjednostavnije je da na aktivaciju (ili form_open) splashscreen-a ili na switchboard-u uradis sljedece:

dim dtmDatum as date

dtmDatum = #03/08/2006#

If dtmDatum = Now() Then
msgbox "Sretan 8. Mart"
else
'radi neki drugi kod
end if

end sub

PS ovo se isto moze raditi sa Case Select...
znaci sve zavisi sta tebi treba

Ideja koju je dao nidisa zvuci Ok, uz jedan mali problem - ne bi se nikad ostvarila.
Ako zadate dtmDatum kao na primer #6 Feb 2006# onda izraz

If dtmDatum = Now()

nikdada prakticno ne bi bio tacan.

Funkcija Now() vraca datum sa satima, minutima, sakundama i delovima sekunde. Kod bi radio ako i samo ako se forma otvori bas u ponoc (00:00) casova na zadani datum, sto je malo verovatno i tesko izvodljiv :-)

#6 Feb 2006# je isto sto i #6 Feb 2006 00:00:00.00#

Treba staviti

dtmDatum=INT(Now())

i mozda cete imati vise srece. INT(Now()) ce da vrati celobrojni deo datuma, zanemarice sate, minute, sekunde i delove sekundi, pa se moze uporediti sa zadatim datumom.

U svakom slucaju, poredjenje zavisi od formata i preciznosti zadanog datuma i o tome treba uvek voditi racuna.

:-)

Hvala na ispravci kolega ;-)

ja sam htio samo na brzaka da otkucam nesto kako bih saznao sta nam je problem...

naravno da bi se na ovo moglo svasta nadovezati....