Question

VB 数据库日期筛选问题

请问VB数据库按日期来筛选怎么做？如下图

数据库名称：abc.mdb
数据库表名：orders
日期栏字段：下单时间
订单号字段：订单号
日期控件：左为DTP1，右为DTP2
数据库已经能正常连接，只差筛选日期的语句。
要求：
无论是选择左边还是右边的日期，都能自动在下方的列表中筛选在选择的日期区间的所有订单，按日期和订单号筛选。
然后，如果点击“只看本月”，那么就自动筛选本个自然月的所有订单，例如7月，点击这个“只看本月，就自动显示2015年7月1日0:0:0到2015年7月31日23:59:59，当然到了8月任意一天，点击这个会显示8月1日到8月31日的。

Answer 1

核心代码

根据日期间隔查询的sql语句
"select * from orders where 日期 between '" & DTP1.Value & "' and '" & DTP2.Value & "'"

根据当前月份查询的sql语句
SELECT * FROM orders WHERE Month(日期) =Month(Now);

追问

按日期筛选的不行，报错如下：

我代码是这样的：因为回复字数有限制，所以只能上图片了，麻烦您看下。

追答

第一，改正以下错误

第二，如果日期这个字段是文本类型还是日期类型？

文本类型用'',日期类型用##

追问

还是不行，是日期类型的，你能告诉我整句怎么写吗？

sql = "select * FROM orders where 下单时间 between #' DTP1.Value '# and #' DTP2.Value '#"

追答

"select * from orders where 日期 between #" & DTP1.Value & "# and #" & DTP2.Value & "#"