范围查询（急急！！！）

Question

chmSQL = "SELECT * FROM hsb"
        chmSQL = chmSQL & " WHERE 日期 Between  '" & Text1.Text & "'  AND '" & Text2.Text & "' "

Answer 1

语法二: chmSQL & " WHERE 结帐日期 Between  #aa#  AND #bb# " 为：
SELECT * FROM hsb WHERE 结帐日期 Between  #aa#  AND #bb#  变量不能用“”扩起来的。
应为：chmSQL & " WHERE 结帐日期 Between  #" & aa & "#  AND #" & bb & "# " 
语法一： CDATE没有用了。
多用用vb的调试工具。

Answer 2

"Where Date > #" & format(now, "YYYY-MM-DD") & "#"

Answer 3

我原来写过一段，你看看吧，我这段程序没问题，是用来按年龄段查找的，比如用户在TXT1和TXT2中分别录入19和23，那就找出19-23岁的人。
Dim txt_a, txt_b As String
txt_a = txt2.Text
txt_b = txt2_b.Text
R_sql_a1 = Str(Year(Date) - Val(txt_a)) + "-12" ' 如：2000-19=19xx 即第一个TXT
R_sql_b1 = Str(Year(Date) - Val(txt_b)) + "-1"    '如：2000-21=19xx 即第二个TXT
SeekString = SeekString + "出生年月 between " + "#" + R_sql_b1 + "#" + " " + "And" + " " + "#" + R_sql_a1 + "#" + " " + "and" + " "
'seekstring 是sql最后的条件的那部分。