access中查询的条件为窗体的某文本框的内容

2024-11-09 02:50:41
推荐回答(1个)
回答1:

Private Sub Command2_Click() '查询按钮,Command2.Caption = "查询"
Adodc1.Recordset.Find "som= '" & Text1.Text & "'", , , 1
If Adodc1.Recordset.EOF Then MsgBox "查询不到", vbCritical
End Sub

这是查找的一种写法