以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何在菜单设置通用的日期筛选？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=118722)
--  作者：Adrain
--  发布时间：2018/5/9 15:48:00
--  如何在菜单设置通用的日期筛选？
求助大神，
我想在菜单里设置一个日期的筛选，这个可以对当前表的选中日期列进行筛选。该如何实现呢？谢谢~
--  作者：y2287958
--  发布时间：2018/5/9 16:00:00
--  
获得当前选定列的列名即可
--  作者：有点甜
--  发布时间：2018/5/9 16:12:00
--  
以下是引用Adrain在2018/5/9 15:48:00的发言：
求助大神，
我想在菜单里设置一个日期的筛选，这个可以对当前表的选中日期列进行筛选。该如何实现呢？谢谢~

 

参考 http://www.foxtable.com/webhelp/scr/1137.htm

 

当前表，选中列，参考

 

Dim c As Col = CurrentTable.cols(CurrentTable.ColSel)
msgbox(c.name)
--  作者：Adrain
--  发布时间：2018/5/9 17:00:00
--  
但是，为什么报运行错误呢？说未找到列

下面是我的代码：
Dim c As Col = CurrentTable.cols(CurrentTable.ColSel)
currenttable.filter = "c.name is null"
--  作者：有点甜
--  发布时间：2018/5/9 17:01:00
--  

Dim c As Col = CurrentTable.cols(CurrentTable.ColSel)
CurrentTable.filter = c.name & " is null"
--  作者：Adrain
--  发布时间：2018/5/9 17:05:00
--  
如果筛选的是日期呢？也是&连接 筛选公式吗？
--  作者：有点甜
--  发布时间：2018/5/9 17:06:00
--  

Dim c As Col = CurrentTable.cols(CurrentTable.ColSel)
CurrentTable.filter = c.name & " = #" & 某个日期值 & "#"
--  作者：Adrain
--  发布时间：2018/5/9 17:08:00
--  
我按您给的改了，但是还是报错“null缺少运算符”
--  作者：有点甜
--  发布时间：2018/5/9 17:11:00
--  
以下是引用Adrain在2018/5/9 17:08:00的发言：
我按您给的改了，但是还是报错“null缺少运算符”

 

贴出你写的代码
--  作者：Adrain
--  发布时间：2018/5/9 17:12:00
--  
更正下报错，是“null运算符后缺少操作数”