Foxtable(狐表)用户栏目专家坐堂 → [求助]隐藏列


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

主题:[求助]隐藏列

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


加好友 发短信
等级:三尾狐 帖子:644 积分:4130 威望:0 精华:0 注册:2016/10/19 16:45:00
[求助]隐藏列  发帖心情 Post By:2017/3/14 7:20:00 [只看该作者]

Dim v As String = "第二列,第四列,第六列"
Dim ary() As String = v.Split(",")
For Each c As String In ary
    Tables("外部通讯表_Table1").Cols(c).Visible =  True
Next


Dim v As String = "第一列,第三列,第五列"
Dim ary() As String = v.Split(",")
For Each c As String In ary
    Tables("外部通讯表_Table1").Cols(c).Visible = False
Next


老师,我想用一个按钮做到显示部分列和隐藏部分列,不知能否。

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


加好友 发短信
等级:超级版主 帖子:110574 积分:562760 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/3/14 8:49:00 [只看该作者]

1楼的代码有什么问题吗?

 

也可以使用这种方式:http://www.foxtable.com/webhelp/scr/1775.htm

 


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


加好友 发短信
等级:三尾狐 帖子:644 积分:4130 威望:0 精华:0 注册:2016/10/19 16:45:00
  发帖心情 Post By:2017/3/14 12:19:00 [只看该作者]

谢谢老师

 回到顶部