關於搜尋2~~~(編號：7796)

請問,如以下之片段程式:
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
也就是查詢"兩個條件"程式該怎麼寫呢??
小女子先謝謝大家囉~~~