为什么访问 Vb 代码中的这段代码给了我语法错误编译器错误

【问题标题】：why this code in access Vb code gives me syntax error compiler error为什么访问 Vb 代码中的这段代码给了我语法错误编译器错误
【发布时间】：2020-04-26 06:11:29
【问题描述】：

Private Sub txtSearch_Change()

If Frame1 = 1 Then 'Code
   strRowsource = "select [Code],[Category],[product]" & "from giggly " & _
   " where[Code] Like '* "&Me.txtSearch.Text&" *'"`
End If
List1.RowSource = strRowsource
End Sub

【问题讨论】：

你能修正一下格式吗？
另外，您可能应该使用不同的方式来访问您的数据库...您正在做的事情有潜在的危险。 portswigger.net/web-security/sql-injection

标签： vba ms-access syntax

【解决方案1】：

from 前面和where 后面需要一个空格。还需要在＆符号周围有空格，但在星号周围不需要空格。

如果意图使用文本框中键入的每个字符来修改列表框，请使用 Change 事件和 Text 属性。还将 AutoExpand 设置为 No。否则使用 AfterUpdate，然后不使用 Text 属性，使用 Value。由于 Value 是默认属性，因此不必指定。

另外，删除不必要的连接。

   strRowsource = "SELECT [Code], [Category], [product] FROM giggly " & _
   "WHERE [Code] Like '*" & Me.txtSearch & "*'"

【讨论】：

好点。不要以为我曾经使用过 Change 事件。我会使用 AfterUpdate 事件。编辑答案。