Visual Basic - SelectionFormula rango de fechas

hola que tal estoy haciendo un proyecto con rango de fechas inicial y final no me da error pero no filtra nada espero yme puedan ayudar
este es el codigo que estoy utilizando
.SelectionFormula = "{base1.fecha}>=Date(" & fechai.Text & ") AND {base1.fecha}<=Date(" & fechaf.Text & ")"
saludos

Al parecer eso es para crystal reports, pero prueba de esta manera:

.SelectionFormula = "{base1.fecha}>=CDate(' " & fechai.Text & " ')" & " AND {base1.fecha}<=CDate(' " & fechaf.Text & " ')"

Saludos cordiales

primero que nada muchas gracias por tomarte la molestia de responder mi pregunta ,la verdad es lo que me faltaba para mi reporte saludos cordiales