Question

我正在尝试在Access中创建可搜索的表单。设置将是5-6个文本框，一对切换和一个按钮。您在文本框中输入任何信息，单击按钮，只显示符合所有条件的记录。

我在互联网上找到了一些代码，似乎给了我所需要的一切：

http://www.allenbrowne.com/ser-62code.html

但是当我把它放入时，它根本不会返回任何内容。到目前为止，我只放入一个文本框，以确保在浪费时间添加一堆AND之前我得到了正确的答案。这是我目前的所有代码：

Private Sub SearchAll_Click()

If Not IsNull(Me.txtCityCounty) Then
    strWhere = strWhere & "([City/County] Like "" * " & Me.txtCityCounty & " * "")"

    Me.Filter = strWhere
    Me.FilterOn = True

    End If

End Sub

如果它有用，＆＃34; SearchAll＆＃34;是我的按钮，＆＃34; txtCityCounty＆＃34;是文本框，＆＃34;城市/县＆＃34;是字段名称。

当我尝试在文本框中输入文本并单击我的按钮时，它不会返回任何内容，并且下面的所有嵌入式文本框都会消失，就好像它正在过滤未出现的内容（我可以向您保证，这不是这个案子。我正在进入＆＃34; Salt＆＃34;）。

我错过了什么？有没有更简单的方法来进行这个项目？

Answer 1

在没有所有额外引号的情况下试试这个

“（[城市/县]喜欢'*'＆amp; Me.txtCityCounty＆amp;”*'）“

如果你想要，你甚至可以通过使用：

来摆脱IF语句

strwhere = nz（“（[City / County]赞'*'＆amp; Me.txtCityCounty＆amp;”*'）“，”“）

Access 2013通过按钮将多个过滤器应用于表单

1 个答案: