Question

我对Access很新，并且我尝试制作一个可搜索的表单，其中表单返回符合几个文本框中所有条件的所有主题。我在网上发现了一个应该完全符合我需要的代码

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

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

但是当我试图为自己跑来跑去时，我遇到了错误。我目前只是尝试连接一个文本框，然后添加其他几个。这是我到目前为止的代码：

Private Sub SearchAll_Click()

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

    End If

End Sub

当我尝试运行它时，我得到＆＃34;编译错误：语法错误＆＃34;和＃34; Private Sub SearchAll_Click（）＆＃34;以黄色突出显示。

如果有帮助：＆＃34; SearchAll＆＃34;是我的按钮，＆＃34; txtCityCounty＆＃34;是文本框，＆＃34;城市/县＆＃34;是字段名称。我目前正在使用Access 2013。

非常感谢任何和所有帮助，谢谢。

Answer 1

代码中的行

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

应显示为红色，表示它是检测到语法错误的行。

如果你看那行，你会发现你的双引号不匹配。我怀疑你打算这样做：

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

或者，也许只是

strWhere = strWhere & "([City/County] Like ""*" & Me.txtCityCounty.Text & "*"")"

取决于您希望通配符如何工作。（我相信您当前的测试将是一个空格，后跟任意数量的字符，后跟一个空格，然后是您的城市/县文本框值，后跟一个空格，后跟任意数量的字符，后跟一个空格。）

编译错误：语法错误MS Access 2013

1 个答案: