Access - fechas Uyuda por favor

Saludo mi pregunta es las siguiente como hago para comparar yna fecha con la fecha actual de manera que si se cumple la comparacion me arroje un mesaje . me explico
si fecha1 => fechaactual entonces
mensaje "esto esta vencido"

if me.fecha = Date() then
msgbox "Correcto"
else
msgbox "Incorrecto"
End if