【发布时间】:2020-07-05 21:10:03
【问题描述】:
谁能告诉我我的代码有什么问题:
Private Sub Command379_Click
Dim strsearch as String
Dim strText as String
strText = Me.TxtSearch.Value
strsearch = "Select * from qryInfo
where ((Supplier Name LIKE ""*" & strText & "*"")
OR (Type LIKE ""*" & strText & "*""))"
Me.RecordSource = strsearch
End Sub
非常感谢!
【问题讨论】: