Para tomar la fecha del sistema
Fecha=Date
Para darle formato investiga sobre la función FormatDateTime(Fecha,?)
Y para compararla en una BD como Access:
SQL="SELECT * FROM TABLA WHERE FECHA=#"&Fecha&"#"
Saludos
<center><img src="http://www.pcmasmas.com.ar/foro/images/avatars/043.gif"><br>
Urjose</center>