Private Sub Command7_Click()
 a1 = "bh like'%" + Text2 + "%'and id like'%" + Text1 + "%'"
   Adodc1.RecordSource = "SELECT * FROM sdzz WHERE " + a1
   Adodc1.Refresh
End Sub以上的查询是针对两个文本框的内容查,怎么什么结果也查不出来呢,