Visual Basic - listar por RANGO DE FECHA

Nuevamente necesito de su ayuda , necesito lista por una fecha determinada, tengo este codigo pero no me resulta, agradecere nuevamente por sus ayuda.


Set Rec = Db.Execute(\" SELECT * FROM consulta1 WHERE Otc_Fecha_ini BETWEEN # \" & Trim(f1) & \"#\" & \" AND #\" & Trim(f2) & \"#\")

Between #" + Format(dtpicker1, "dd-mm-yyyy") + "# And #" + Format(dtpicker2, "dd-mm-yyyy") + "#

de partida u planteamiento es malo

"select * from tabla HAVING fecha Between #" + Format(dtpicker1, "dd-mm-yyyy") + "# And #" + Format(dtpicker2, "dd-mm-yyyy") + "# "

si no te resulta eso uf