隐藏topicbar中的某个页面 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 隐藏topicbar中的某个页面

共有2203人关注过本帖树形打印复制链接主题：隐藏topicbar中的某个页面

deliangzhaoe

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

等级：小狐帖子：364 积分：3491 威望：0 精华：0 注册：2012/7/24 7:15:00

隐藏topicbar中的某个页面 发帖心情

Post By：2019/4/22 6:37:00 [只看该作者]

除超级管理员和管理员外，其他人隐藏任务栏中的某个页面，主窗口afterload设置了如下代码：

'除超级管理员和管理员,其他人不显示页面双重预防体系

If _UserGroup <> "超级管理员" AndAlso _UserGroup <> "管理员" Then

Forms("mainform").Controls("TopicBar1").Pages("双重预防体系").visible = False

Else

Forms("mainform").Controls("TopicBar1").Pages("双重预防体系").visible = true

End If

但是打开窗口后，所在人均不显示了，怎么回事？

请老师帮忙改一下代码，谢谢

[此贴子已经被作者于2019/4/22 6:39:01编辑过]

有点色

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

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2019/4/22 10:08:00 [只看该作者]

加入代码，弹出什么值？

msgbox(_UserGroup)

deliangzhaoe

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

等级：小狐帖子：364 积分：3491 威望：0 精华：0 注册：2012/7/24 7:15:00

Post By：2019/4/22 20:55:00 [只看该作者]

提示框为空

我知道怎么回事了，

我代码的位置换了一下，已经解决了，谢谢

主题：隐藏topicbar中的某个页面