關於搜尋~~~(編號：7795)

請問,如以下之片段程式:
Private Sub Command1_Click()
On Error GoTo selerror
Adodc1.Recordset.Filter = Combo1.Text & "=#" & Text1.Text & "#"
Exit Sub
end sub
其中Combo1.Text & "=#" & Text1.Text & "#"若要改成combo1.text ＞ text1.text and combo1.text ＜ text2.text
也就是查詢"某一段時間"程式該怎麼寫呢??
小女子先謝謝大家囉~~~