我想用關鍵字來搜尋資料，請問要如何寫呢?
Private Sub cmdFind_Click()
Adodc1.Refresh
Dim ID As String
ID = InputBox$("請輸入公司名稱", "測試")
ID = "公司名稱 = '" & ID & "'"
Adodc1.Recordset.Find ID
End Sub
我該加什麼呢??
Private Sub cmdFind_Click()
Adodc1.Refresh
Dim ID As String
ID = InputBox$("請輸入公司名稱", "測試")
ID = "公司名稱 = '" & ID & "'"
Adodc1.Recordset.Find ID
End Sub
我該加什麼呢??
文章標籤
全站熱搜
