Duda sobre como poner una fecha?

[mdavila]

Esto es suponiendo que guardas la hora minutos y segundos no!!!!, porque si no comparas las fechas con un simple fecha = fecha.

'artesanalmente es asi
Dim FechaHoy As Date
If FechaHoy.Day = TuFecha.Day And FechaHoy.Month = TuFecha.Month And FechaHoy.Year = TuFecha.Year Then
'es hoy
Else
'no es hoy
End If

Saludos.