我想用關鍵字來搜尋資料，請問要如何寫呢?
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
我該加什麼呢??
請先 登入 以發表留言。