主题：[求助]如何根据窗口页面名定义页面集合

老师你好,麻烦指点一下,根据窗口多个页面的名称定义一个页面集合代码,谢谢

根据''页面授权表''控制窗口中的页面的隐藏与显示,代码如下:

For Each pg  As WinForm.TabPage In e.Form.Controls("查询").TabPages
    For Each dr As DataRow In DataTables("页面授权表").Select("用户名 = '" & User.Name & "' and  窗口名 = '" & e.Form.Name & "'")
        Dim ctls() As String = dr("页面名").split(",")
        For Each c1 As String In ctls
            pg.Visible = not dr("不可见")
        Next
    Next  
Next

麻烦老师修改一下