主题：菜单和权限管理

If _UserRole = "管理员" Then
    RibbonTabs("人员管理").Groups("操作").Items("编    辑").Visible = False
    RibbonTabs("人员管理").Groups("操作").Items("导    入").Visible = False
    RibbonTabs("人员管理").Groups("操作").Items("导入历史库").Visible=False
Else
    RibbonTabs("人员管理").Groups("操作").Items("编    辑").Visible = True
    RibbonTabs("人员管理").Groups("操作").Items("导    入").Visible = True
    RibbonTabs("人员管理").Groups("操作").Items("导入历史库").Visible=True
End If

我把上面代码写入菜单的loadusersetting事件中，但是设置无效？当管理员进去后 ，还是可以看到这些按钮