Foxtable(狐表)用户栏目专家坐堂 → 求按钮循环代码


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

主题:求按钮循环代码

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


加好友 发短信
等级:九尾狐 帖子:2464 积分:22751 威望:0 精华:0 注册:2011/3/29 17:14:00
求按钮循环代码  发帖心情 Post By:2013/6/13 0:03:00 [只看该作者]

比如设计一个按钮 按一下隐藏逻辑列 为False的行  再按一下显示所有行  并将逻辑列为False的升序

 

 


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


加好友 发短信
等级:版主 帖子:5246 积分:33163 威望:0 精华:8 注册:2013/1/17 21:28:00
  发帖心情 Post By:2013/6/13 7:09:00 [只看该作者]

按钮文本初始为"显示真值"

 

If e.Sender.Text = "显示真值" Then
    e.Sender.Text = "显示全部"
    Tables("表A").Filter = "逻辑列 = True"
Else
    e.Sender.Text = "显示真值"
    Tables("表A").Filter = ""
    Tables("表A").Sort = "逻辑列"
End If


 回到顶部