请教蓝老师,下面代码基本能通过授权表来实现在授权表的分组名写入多值对窗口控件的权限控制,但是一行一个的输入控件名称工作量好大,怎样能在一个单元格里面写入多个控件名称统一控制不可见或不可编辑
For Each dr1 As DataRow In DataTables("授权表").Select("',' + 分组名 + ',' like '%," & _UserGroup & ",%' And 窗口 = '" & e. Form.Name & "' and ',' + 控件 + ',' like '% '") 黄色部分有问题
e.Form. Controls(dr1("控件")).Visible = Not dr1("不可见")
e.Form. Controls(dr1("控件")).Enabled = Not dr1("不可编辑")
Next