Question

我一直在尝试获取我在Access中运行的查询以在VBA中运行，但由于我一直在使用的感叹号数量，我一直收到错误。我正在使用的陈述是

 SQLstat = "SELECT tbl_Date_Check.DateofChecklist, tbl_Tasks.QuestionNumber,tbl_Tasks.Frequency, tbl_Tasks.Questions " _ 
& "FROM tbl_Tasks, tbl_Date_Check " _
& "WHERE (((tbl_Date_Check.DateofChecklist)=""" & [Forms]![Daily_Checker]![TxtDate] & """) And ((tbl_Tasks.Frequency) = """ & [Forms]![Daily_Checker]![ComFreq]"""))"

任何帮助都会非常感谢

Answer 1

这可以通过以下SO问题来解释：What is the difference between single and double quotes in SQL?

这说明您几乎在每个实例中都需要使用单引号''来包围SQL中的文本。您使用双引号""的事实可能是导致错误的原因。

我希望这会有所帮助。

-C§

Answer 2

日期必须如下所示：

SQLstat = "SELECT tbl_Date_Check.DateofChecklist, tbl_Tasks.QuestionNumber,tbl_Tasks.Frequency, tbl_Tasks.Questions " _ 
& "FROM tbl_Tasks, tbl_Date_Check " _
& "WHERE ((tbl_Date_Check.DateofChecklist = #" & Format([Forms]![Daily_Checker]![TxtDate], "yyyy\/mm\/dd") & "#) And (tbl_Tasks.Frequency = " & [Forms]![Daily_Checker]![ComFreq] & "))"

Access中的SQL语句

2 个答案: