Búsqueda entre 2 fechas

[sielfi]

Hola. Necesito que me ayuden con un código para poder realizar una búsqueda entre 2 fechas.

Hago la búsqueda en un datagrid utilizando Filter, al apretar un command button, que es el botón buscar.

El código es este:

Private Sub Command5_Click()
If Len(Trim(Text4.Text)) >= 1 Then
Adodc1.Recordset.Filter = "Fecha_Ingreso =#" & Format(Text4, "dd/mm/yyyy") & "#"
Else

Adodc1.Refresh
End If
End Sub

Me funciona pero para buscar una fecha en particular. Yo quiero buscar todas las fechas que se hayan dado de alta entre 2 fechas, que serán ingresadas en 2 textbox, text4 y text5.

Y también cómo puedo validar que no se ingresen fechas previas al 16/06/2006. Esto es para que cuando se de el alta un artículo, no se pueda ingresar fechas anteriores al 16/06/2006 ni fechas posteriores a la actual del sistema.

Muchísimas gracias.

PD: utilizo el lenguaje de VB 6.0, no SQL.