[Resolvido]Critério Entre Datas

Olá a todos . . .

Preciso de uma ajuda vossa, tenho um form que filtra por datas, e coloquei o critério :

Entre [Forms]![frmPesquisaVisitas]![DI] E [Forms]![frmPesquisaVisitas]![DF]

Ao colocar este critério na consulta, ao entrar no form , não aparece nenhum registo e não filtra. O que esta incorreto ?

Obrigado

Um bem hajam !

Sr. Avelino muito obrigado.

No entanto mesmo com o critério alterado para :

(Entre [Forms]![frmPesquisaVisitas]![DI] E [Forms]![frmPesquisaVisitas]![DF]) OR ([Forms]![frmPesquisaVisitas]![DI] is null) OR ([Forms]![frmPesquisaVisitas]![DF] is null)

Ao colocar na consulta após gravar fica apenas assim :

Entre [Forms]![frmPesquisaVisitas]![DI] E [Forms]![frmPesquisaVisitas]![DF]

E não filtra . . .

Tenho o seguinte código

Código:

Private Sub btnFiltrarData_Click()
Dim filtro As String
filtro = "DataVisita between # " & Format(DI, "mm/dd/yyyy") & " # and # " & Format(DF, "mm/dd/yyyy") & " #"
Me.Filter = filtro
Me.FilterOn = True
Me.Requery
End Sub

Obrigado

Resolvido !

Obrigado Sr. Avelino . . .

Resolvi assim :

Código:

Private Sub btnFiltrarData_Click()
filtro = "[DataVisita] Between #" & Format(Me!DI, "mm/dd/yyyy") & "# AND #" & Format(Me!DF, "mm/dd/yyyy") & "#"
Me!frmsubRegistarVisitas.Form.Filter = filtro
Me!frmsubRegistarVisitas.Form.FilterOn = True
End Sub

Obrigado