| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 如何控制Tabcontrol中某个页签的权限 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=65607) |
| -- 作者：jhq1989 -- 发布时间：2015/3/19 9:29:00 -- 如何控制Tabcontrol中某个页签的权限 “If User.IsRole("开发者") Or User.IsRole("管理员") pg = Forms("指标库窗口").Controls("TabControl1").tabpage（10） pg.Visible = False End If 这里面没有tabpage的方法啊，还有如果只是锁定不是隐藏改怎么写。 |
| -- 作者：有点甜 -- 发布时间：2015/3/19 9:37:00 -- If User.IsRole("开发者") Or User.IsRole("管理员") Dim pg As WinForm.TabPage pg = Forms("指标库窗口").Controls("TabControl1").tabpages(1) pg.Visible = False End If |
| -- 作者：jhq1989 -- 发布时间：2015/3/19 9:41:00 -- 如果是锁定某个页签呢 还有这代码是写在哪呢 |
| -- 作者：有点甜 -- 发布时间：2015/3/19 9:41:00 -- afterload |
| -- 作者：jhq1989 -- 发布时间：2015/3/19 9:53:00 -- 如果要是冻结的话该怎么办 |
| -- 作者：jhq1989 -- 发布时间：2015/3/19 9:56:00 -- 没有readonly这个方法啊
|
| -- 作者：有点甜 -- 发布时间：2015/3/19 9:57:00 -- If User.IsRole("开发者") Or User.IsRole("管理员") Dim pg As WinForm.TabPage pg = Forms("指标库窗口").Controls("TabControl1").tabpages(1) For Each c As object In pg.Children c.enabled = False Next End If |