Question

用vb access做数据库，在vb中写查询代码时报错：缺少语句结束

sqlfind = "select*from 入出库 where 货单号 between'" & Combo1.Text&"'and '"&combo2.Text&"'"
复制过来自动换行了~~~不存在换行的错误
下面语句报错：缺少括号
find_date1=format(cdate(comboy(0).Textcombom(0).Text&combod(0).Text),"yyyy_mm_dd")

find_date2=format(cdate(comboy(1).Text&"-"&combom(1).Text&"-"&combod(1).Text),"yyyy_mm_dd")
sqlfind="select*from入出库where 日期 between #"&find_date1&"#"&"and"&"#"&find_date2&"#""
检查好多遍了~~~不知道到底是哪错了~~~请教各位了~~
因为我财富值太低~~~~给不了分%>_<%~~~不好意思了~~~~~~(>_<)~~~~ ~谢谢热心善良的亲╭(╯3╰)╮

Answer 1

授人以鱼不如授人以渔。 简单说说类似情况如何查错调试。

当一行复合代码过于复杂或者过于冗长时，可以考虑添加一个或几个临时变量，逐个元素的组合起来。
例如你上面 find_date1 那一行，可以改为：
Dim TempStr as string
TempStr = comboy(0).Textcombom(0).Text '其实这句我就觉得很奇怪，很像中间漏掉了一个运算符
TempStr = TempStr & combod(0).Text
find_date1=format(TempStr),"yyyy_mm_dd")
然后单步执行，观察 TempStr 的值是否异常。
其他的也可以用类似的方法分步查错。