Question

我有一个简单的数据库来跟踪工作中的事件。在主窗体上是一个子窗体，该子窗体显示了所有已记录事件的简要概述。

我在子表单的标题中有一个搜索框，用于搜索“详细信息”字段中的关键字，但是我希望它也同时在子表单的“位置”字段中进行搜索。

我的代码是：

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给出了语法错误。

“详细信息”和“位置”在表中均定义为“长文本”。

谢谢。

Answer 1

尝试一下：

strFilter = "Details like '*" & Me.Text18 & "*' OR Location like '*" & Me.Text18 & "*'"

Access 2013-在两个字段中搜索文本框

1 个答案: