日期筛选代码问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 日期筛选代码问题

共有5192人关注过本帖树形打印复制链接主题：日期筛选代码问题

532net

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

加好友

发短信

等级：婴狐帖子：35 积分：325 威望：0 精华：0 注册：2012/5/5 22:04:00

日期筛选代码问题 发帖心情

Post By：2013/8/2 13:26:00 [显示全部帖子]

各位老师好：

Dim rq As WinForm.DateTimePicker = e.Form.Controls("riqi")
Tables("运单表").Filter = "[CREATED_ON] = #" & rq & "# "

我在按钮控件中CLICK属性添加了以上代码，想筛选出字段CREATED_ON]=日期输入控件中输入的日期，但是确定的时候，出现如下错误提示

编译错误 Oper '&' is not defined for types ‘string’ and winform.datatimepicker

请老师看下是哪个地方出现了问题？

532net

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

加好友

发短信

等级：婴狐帖子：35 积分：325 威望：0 精华：0 注册：2012/5/5 22:04:00

Post By：2013/8/2 14:35:00 [显示全部帖子]

以下是引用lsy在2013-8-2 13:57:00的发言：
Tables("运单表").Filter = "[CREATED_ON] = #" & rq.Value & "# "

您好，按照您的方式，输入日期后，无法筛选出符合条件的信息，我将项目上传，麻烦帮我修改下可以吗

下载信息 [文件大小：下载次数： ]
点击浏览该文件:sinoex.rar

532net

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

加好友

发短信

等级：婴狐帖子：35 积分：325 威望：0 精华：0 注册：2012/5/5 22:04:00

Post By：2013/8/3 12:36:00 [显示全部帖子]

感谢大家的回复，今天终于找到问题所在了

Dim riqi As WinForm.DateTimePicker = e.Form.Controls("日期选择")
Tables("fa piao查询").Filter = "[CREATED_ON] > #" & riqi.value &" #"

外部数据源加载的CREATED_ON字段是日期时间型的数据：比如：2013-08-02 17:23:19，

跟本地窗口控件值riqi.value 日期型数据：2013-08-02 进行“ = ”筛选，无法获取符合条件的数据，只有使用>或者<对比，才能筛选出符合条件的数据

请问大家，如何将2013-08-02 17:23:19这种类型的字段加载后同时修改为2013-08-02 这种类型的数据？

532net

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

加好友

发短信

等级：婴狐帖子：35 积分：325 威望：0 精华：0 注册：2012/5/5 22:04:00

Post By：2013/8/3 13:12:00 [显示全部帖子]

以下是引用狐狸爸爸在2013-8-3 12:40:00的发言：
你可以这样筛选的，例如筛选2013年8月2日的

Dim dt As Date = #8/2/2013#
Tables("fa piao查询").Filter = "[CREATED_ON] >= #" & dt & "# And [CREATED_ON] < #" & dt.AddDays(1) & "#"

谢谢狐狸爸爸，问题顺利解决

下一主题 >> << 上一主题

主题：日期筛选代码问题