Question

我无法运行以下报告。我一直得到运行时错误3075. reportText是表单上的文本框字段。该错误似乎出现在reportsearch字段中。

Private Sub Command284_Click（）

Dim reportsearch As String Dim reportText As String

如果是IsNull（Me.txtReport.Value）那么 MsgBox＆＃34;此框必须连续关键字＆＃34; Me.txtReport.SetFocus

否则 reportText = Me.txtReport.Value

reportsearch =＆＃34; SELECT * FROM NCECBVI WHERE（[姓] LIKE＆＃34;＆＃34; ＆＃34;＆amp; reportText＆amp;＆＃34; ＆＃ 34;＆＃34;或（[名字]喜欢＆＃34;＆＃34; ＆＃34;＆amp; reportText＆amp;＆＃34; ＆＃34;＆＃34;））＆＃34;

DoCmd.OpenReport＆＃34; NCECBVI-Report＆＃34;，acPreview ,, reportsearch

结束如果

End Sub

Answer 1

WhereCondition命令的OpenReport参数应该只包含条件本身，而不包含其他语法。将您的reportsearch作业更改为：

reportsearch = "[Last Name] LIKE """ & reportText & """ OR [First Name] LIKE """ & reportText & """"

此外，您在条件中使用LIKE，但您没有任何通配符。将LIKE更改为=或使用通配符获取包含输入字符串的匹配项：

reportsearch = "[Last Name] LIKE ""*" & reportText & "*"" OR [First Name] LIKE ""*" & reportText & "*"""

访问运行时错误3075

1 个答案: