【发布时间】:2018-07-17 14:02:27
【问题描述】:
我有一个简单的数据库来跟踪工作中的事件。主窗体上有一个子窗体,显示所有记录的事件的简要概述。
我在子表单的标题中有一个搜索框,用于在“详细信息”字段中搜索关键字,但我希望它同时在子表单的“位置”字段中进行搜索。
我的代码是:
Private Sub Text18_Change()
Dim strFilter As String
Me.Refresh
strFilter = "Details like '*" & Me.Text18 & "*'"
Forms![Main Form]![MainIncidentList].Form.Filter = strFilter
Forms![Main Form]![MainIncidentList].Form.FilterOn = True
Me.Text18.SelStart = Nz(Len(Me.Text18), 0)
End Sub
我在 Access 和 VBA 方面相对较新,但我已经走到了这一步,谁能给我一些关于如何将“位置”字段添加到搜索的建议?我试过添加
" And "Location like '*" & "Me.Text18 & "*'"
在“strFilter”行的末尾,但它不起作用,Access 给出了语法错误。
“详细信息”和“位置”在表格中均定义为“长文本”。
提前致谢。
【问题讨论】:
标签: ms-access vba ms-access-2013