''权限控制
If _UserRole ="超级管理员" Then
DataTables("person").LoadFilter = ""
DataTables("organList").LoadFilter = ""
DataTables("history").LoadFilter = ""
DataTables("user").LoadFilter = ""
For Each t As Table In Tables
t.AllowEdit = False
Next
RibbonTabs("单位管理").Groups("操作").Visible=False
RibbonTabs("部门管理").Groups("操作").Visible=False
RibbonTabs("人员管理").Groups("操作").Visible=False
RibbonTabs("历史库管理").Groups("操作").Visible=False
我在用户登录窗口的确认代码中这么写代码,但是,老提示说,不存在名为单位管理的功能区和名为部门管理的功能区, 难道我这么写有问题么,