To tentando filtrar três datas mas o filtro sempre me traz zero registro

o que está errado e como devo proceder

DatRecebido.RecordSource = "Select * From CtaRecebido Where format(RecDataSistema, 'DD/MM/YYYY') <= #" & MskDatIni.Text & "#" & " and format(RecRecebidoData, 'DD/MM/YYYY') > #" & MskDatIni.Text & "#" & " and format(RecRecebidoData, 'DD/MM/YYYY') <= #" & Date & "#"

 

Um muito Obrigado

tena assim:

 

DatRecebido.RecordSource = "Select * From CtaRecebido Where RecDataSistema <= #" & Format(MskDatIni.Text,"YYYY/MM/DD" & "#  and RecRecebidoData > #" & Format(MskDatIni.Text,"YYYY/MM/DD") & "# " and RecRecebidoData <= #" & Format(Date,"YYYY/MM/DD") & "#"

Obrigado pela ajuda, o seu exemplo funcionou.

T+