[求助] 怎么批量关闭列窗口呢？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助] 怎么批量关闭列窗口呢？

共有3502人关注过本帖树形打印复制链接主题：[求助] 怎么批量关闭列窗口呢？

龙潭春早

小大 1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：676 积分：4895 威望：0 精华：0 注册：2018/3/22 16:05:00

[求助] 怎么批量关闭列窗口呢？ 发帖心情

Post By：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

龙潭春早

小大 2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：676 积分：4895 威望：0 精华：0 注册：2018/3/22 16:05:00

Post By：2019/10/18 18:27:00 [显示全部帖子]

哦好！

顺便请教一下，从语法上来说，1楼的代码没有错误吧？

龙潭春早

小大 3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：三尾狐帖子：676 积分：4895 威望：0 精华：0 注册：2018/3/22 16:05:00

Post By：2019/10/18 22:47:00 [显示全部帖子]

主题：[求助] 怎么批量关闭列窗口呢？