我想用關鍵字來搜尋資料,請問要如何寫呢?
Private Sub cmdFind_Click()
Adodc1.Refresh
  Dim ID As String
  ID = InputBox$("請輸入公司名稱", "測試")
  ID = "公司名稱 = '" & ID & "'"
  Adodc1.Recordset.Find ID
End Sub
我該加什麼呢??
創作者介紹
創作者 vbqa 的頭像
vbqa

小吳 VBQA 程式設計討論

vbqa 發表在 痞客邦 留言(0) 人氣()