在菜单系统事件的LoadUserSetting中加入以下代码：If _UserName = "赵一" Then
RibbonTabs("Table").Visible = True
RibbonTabs("Project").Visible = True
RibbonTabs("Other").Groups("Execute").Items("SQLExecute").Enabled = True
RibbonTabs("Other").Groups("Execute").Items("Command").Enabled = True
Else
RibbonTabs("Table").Visible = False
RibbonTabs("Project").Visible = False
RibbonTabs("Other").Groups("Execute").Items("SQLExecute").Enabled = False
RibbonTabs("Other").Groups("Execute").Items("Command").Enabled = False
End If
想实现除用户赵一外，其余用户登陆时隐藏“数据表”和“管理项目”两个功能区，并禁用“执行SQL”和“命令窗口”两个按钮。
现在出现的问题是，当我用除赵一外其他用户直接打开项目时，此代码功能可以实现，但是我切换成赵一时，菜单不会发生变化，依旧是隐藏“数据表”和“管理项目”两个功能区，并禁用“执行SQL”和“命令窗口”两个按钮；当我用赵一登陆时，菜单不会实现代码功能，当我切换成别的用户时，菜单也不会隐藏“数据表”和“管理项目”两个功能区，也不会对其他用户禁用“执行SQL”和“命令窗口”两个按钮。
这是怎么回事儿？求教~~~
加好友 
发短信
Post By：2020/5/21 15:38:00 [显示全部帖子]
