Access - Dlookup

Tengo un problema con el manejo del Dlookup, he creado un bucle While - Wend para buscar registros en una tabla con la función Dlookup, funciona bien hasta que un registro no aparece en la tabla, devolviendo NULL. El problema es que a partir de ahí siempre devuelve NULL, no se cual es el motivo.
Gracias.

antes de hacer el Dlookup valida el valor del campo con un if si es nulo no lo proceses.

Gracias, Enrique.
Lo que tengo hecho es esto:

Private Sub Boton_Click()
Dim X As Variant
Dim D As Date
D = Format(Date, "dd-mm-yyyy")
D = [FInicial]
MsgBox "Fecha Inicial: " & D
While D <= [FFinal]
X = DLookup("[Id]", "Registro de hora", "[CRT] = [Trabajador] AND [Fecha]=# " & D & "#")
If IsNull(X) Then
MsgBox "Falta al trabajo"
Else
MsgBox "Asiste a trabajar"
End If
D = D + 1
MsgBox "Dia despues: " & D
Wend
End Sub

En un formulario con tres cuadros de texto donde introducir [FInicial], [FFinal] y [Trabajador], y un boton que ejecuta este código.
El problema es que aún existiendo un registro determinado, no lo encuentra y devuelve un Null.

A ver si me puedes ayudar.
Gracias

revisa el link

Hola,

Es un problema con la fecha, quita la instrucción D=format(date,"dd-mm-yyyy") de donde la tienes y cambia la instruccion dlookup por lo siguiente
X = DLookup("[Id]", "Registro de hora", "[CRT] = [Trabajador] AND [Fecha]=# " & format(D,"mm/dd/yyyy") & "#")

Saludos