[求助] 时段查询 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助] 时段查询

共有2010人关注过本帖树形打印复制链接主题：[求助] 时段查询

zcgmxf

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1653 积分：14702 威望：0 精华：0 注册：2014/6/6 8:42:00

[求助] 时段查询 发帖心情

Post By：2018/3/16 13:01:00 [只看该作者]

老师，这几天发现一个问题，截图所示的拍摄日期为什么结束时间和开始时间都为 2018-03-15 时不加载？结束时间为 2018-03-16 时可以。谢谢！

此主题相关图片如下：qq图片20180316081635.png

代码：

Dim rq1 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")

Dim rq2 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker2")

DataTables("拍摄照片").LoadFilter = "拍摄时间 >= '" & rq1.Value.Date & "' and 拍摄时间 <= '" & rq2.Value.Date & "'"

DataTables("拍摄照片").Load()

代码为：

DataTables("拍摄照片").LoadFilter = "拍摄时间 >= '" & rq1.Value & "' and 拍摄时间 <= '" & rq2.Value& "'"

DataTables("拍摄照片").Load()

也不加载

[此贴子已经被作者于2018/3/16 13:06:45编辑过]

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2018/3/16 14:33:00 [只看该作者]

改成这样

Dim rq1 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")

Dim rq2 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker2")

DataTables("拍摄照片").LoadFilter = "拍摄时间 >= '" & rq1.Value.Date & "' and 拍摄时间 < '" & rq2.Value.Date.AddDays(1) & "'"

DataTables("拍摄照片").Load()

zcgmxf

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：七尾狐帖子：1653 积分：14702 威望：0 精华：0 注册：2014/6/6 8:42:00

Post By：2018/3/17 0:47:00 [只看该作者]

老师，以前好像没有这种情况。。。。

有点蓝

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：110750 积分：563676 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2018/3/17 8:58:00 [只看该作者]

如果日期没有时分秒，原来的代码不会有问题。至于为什么，请思考一下

主题：[求助] 时段查询