以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于筛选  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=34315)

--  作者:lc_guo
--  发布时间:2013/6/5 9:49:00
--  关于筛选

我的表是 “主要生产原材料进料统计”

而我设置了筛选键,其代码为

Dim 起始日期填写 As Date
Dim 结束日期填写 As Date
Tables("主要生产原材料进料统计").Filter = "[日期] >= #" & 起始日期填写 & "# And [日期] <= #" & 结束日期填写 & "#"

在我输入了数据之后,为何筛选不出所选结果呢?


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20130605094733.png
图片点击可在新窗口打开查看

--  作者:Bin
--  发布时间:2013/6/5 9:52:00
--  
看看是否正常获得了你填写的值. 并且弹出拼接的筛选条件语句看看.
--  作者:lc_guo
--  发布时间:2013/6/5 9:54:00
--  

按照图示,假如我输入时间为2013-02-01至2013-02-10,

表中是有数据的,

但是点击筛选后,没有显示任何行。


--  作者:XYT
--  发布时间:2013/6/5 9:54:00
--  

起始日期填写 都不是控件的值,本来没有值,所以不行。你把控件的值赋值给起始日期填写 或直接用控件的值来筛选


--  作者:lc_guo
--  发布时间:2013/6/5 9:59:00
--  

“起始日期填写”,就是指控件 datetimepicker

所填写的日期,怎么会不是控件的值呢?


--  作者:XYT
--  发布时间:2013/6/5 10:02:00
--  

你上面给出的代码是筛选按钮的完全代码还是部分?如果是全部就是我说的问题。


--  作者:lsy
--  发布时间:2013/6/5 10:07:00
--  

上菜


--  作者:狐狸爸爸
--  发布时间:2013/6/5 11:06:00
--  

Dim dt1 s Date = e.Form.Controls("起始日期填写").Value
Dim dt2 s Date = e.Form.Controls("结束日期填写 ").Value

Tables("主要生产原材料进料统计").Filter = "[日期] >= #" & dt1 & "# And [日期] <= #" & dt2 & "#"