Foxtable(狐表)用户栏目专家坐堂 → [各位大神指教]这样如何实现?


  共有4282人关注过本帖树形打印复制链接

主题:[各位大神指教]这样如何实现?

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/2/17 11:51:00 [显示全部帖子]

首先计算出今天是星期几:

http://www.foxtable.com/help/topics/1337.htm

http://www.foxtable.com/help/topics/0229.htm

 

然后根据这个星期几的数字得到对应的列名,根据这一列筛选就行:

 

Tables("xxx").filter =“这一列 = True”


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/2/17 11:53:00 [显示全部帖子]

如果你用星期一、星期二这样的列名,可以直接:

 

Dim nm As String  = Format(Date.Today, "dddd") 

Tables("xxx").filter = nm & “ = True”

 

 


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47449 积分:251065 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/2/17 16:15:00 [显示全部帖子]

没关系的,20个字段不算多的。


 回到顶部