VB数据库查询为什么不能当天呢？

[qq_31501041]

Dim SQL As String
SQL = "select * from 销售 where 日期>= #" & rq1.Value & "# and 日期<= #" & rq2.Value & "# "
Adodc1.RecordSource = SQL
Set MSHFlexGrid1.DataSource = Adodc1
Adodc1.Refresh

按这个查询出来的数据有点问题。
比如，我查1号到8号的数据会显示1号到7号的数据，8号 的数据却没有，但过把结束时间调到9号。8号的数据就显示出来了。
请问是怎么回事？

如果要查询到8号的数据应该怎么该？求代码

[worldy]

SQL = "select * from 销售 where 日期>= #" & rq1.Value & "# and 日期<= #" & rq2.Value & " 23:59:59# "

[of123]

因为日期时间字段是包含时间的，而一个没有时间值的日期，缺省认为是 0 点。最简单的，你加一天就可以了。 SQL = "select * from 销售 where 日期>= #" & Format(rq1.Value, "yyyy-mm-dd") & "# and 日期<= #" & Format(rq2.Value + 1, "yyyy-mm-dd") & "# "

[饮水需思源]

时间的原因： SQL = "select * from 销售 where 日期>= #" & rq1.Value & " 00:00:00# and 日期<= #" & rq2.Value & " 23:59:59# "