请问下述Access VBA代码中存在语法错误的原因是什么?
代码语法错误原因分析
以下是这段Access VBA代码存在的语法/逻辑报错点:
- 控件名拼写错误:第一行判断条件里写的是
Me.DateBeign,但后续SQL拼接里使用的控件名是Me.DateBegin,两者拼写不一致,要么触发控件未定义报错,要么导致判断条件永远无法触发。 - 日期常量格式不符合要求:Access SQL中使用
#包裹日期值时,#和日期内容之间不能存在多余空格。当前代码拼接后的SQL会生成# 2024-05-20 #这类带前后空格的日期格式,数据库无法识别,直接触发SQL语法错误。 - 字段名存在多余空格:SQL语句中引用的第二个字段为
[End dates of controls ],末尾多了一个空格,若对应数据库表中的字段名没有该末尾空格,会触发字段不存在的报错。
修正后的参考代码
If Me.DateBegin <> "" And Me.DateEnd <> "" Then q = "SELECT * FROM Controls WHERE [Begin dates of control] = #" & Me.DateBegin & "# AND [End dates of controls] = #" & Me.DateEnd & "#" Me.RecordSource = q End If
内容的提问来源于stack exchange,提问作者Karol Śpila
相关产品推荐
相关产品推荐

