- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助] 怎么批量关闭列窗口呢？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=142106)
-- 发布时间：2019/10/18 15:48:00
-- [求助] 怎么批量关闭列窗口呢？
表中的列窗口有点多，想一次性的批量关闭。
不想用遍历的方法，只想用 Select Case 语句。
在表的 AfterLoadTableSetting 事件里，添加了下面的代码，
重启项目，怎么不执行呢？
怎么解决呢？
Dim clName1 As String = "列名1" \' 批量关闭列窗口
Dim clName2 As String = e.Table.Cols(clName1).Name
Select Case clName1
Case "列名1","列名2","列名3","列名4","列名5","列名6"
e.Table.Cols(clName1).CloseWindow() \' 关闭列窗口
End Select
-- 发布时间：2019/10/18 16:03:00
--
只能用遍历的方法
dim str() as string = {"列名1","列名2","列名3","列名4","列名5","列名6"}
遍历设置的代码
-- 发布时间：2019/10/18 18:27:00
--
哦 好！
顺便请教一下，从语法上来说，1楼 的代码没有错误吧？
-- 发布时间：2019/10/18 20:44:00
--
语法没有问题。逻辑上没有任何用处
-- 发布时间：2019/10/18 22:47:00
--
-- 发布时间：2019/10/18 23:03:00
--
这个代码永远只能判断"列名1"。因为第一句代码就已经写死了。再说了select case也不适合用在这个事件处理这种逻辑