以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]隐藏列  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=97515)

--  作者:苏州老街
--  发布时间: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


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

--  作者:有点蓝
--  发布时间:2017/3/14 8:49:00
--  

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

 

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

 


--  作者:苏州老街
--  发布时间:2017/3/14 12:19:00
--  
谢谢老师