以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  多值权限  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=169665)

--  作者:qazlinle6
--  发布时间:2021/6/25 10:23:00
--  多值权限
e.Form.Controls(dr("控件名")).Enabled = Not dr("权限锁定")
e.Form.Controls(dr("控件名")).visible = Not dr("权限不可见到")


可以改成多值的不

--  作者:有点蓝
--  发布时间:2021/6/25 10:25:00
--  
哪个是多值?
--  作者:qazlinle6
--  发布时间:2021/6/25 10:26:00
--  
dr("控件名")
--  作者:有点蓝
--  发布时间:2021/6/25 10:27:00
--  
再拆分咯

for each s as string in dr("控件名").split(",")
e.Form.Controls(s).Enabled = Not dr("权限锁定")
e.Form.Controls(s).visible = Not dr("权限不可见到")
next

--  作者:qazlinle6
--  发布时间:2021/6/25 10:32:00
--  
可以了