关于在修改窗体中使用权限功能

时　间:2015-12-14 21:54:54
作　者:流星   ID：34871  城市：天津
摘　要:在使用平台功能时，可能会在编辑窗体中使用权限功能，如审核、取消审核，那么我们可以使用快速开发平台中的权限功能
正　文:

      在使用平台功能时，可能会在编辑窗体中使用权限功能，如审核、取消审核，那么我们可以使用快速开发平台中的权限功能，如下：

在编辑窗体VBA最上面加一句：

Private mdctPermissionList  As Collection

然后在打开事件中加入需要的权限功能就可以了，哈哈，简单吧！

例如：在编辑窗体上在一个名为Cmd4的按钮，权限如下：

Private Sub Form_Open(Cancel As Integer)
    Set mdctPermissionList = LoadPermissions("报关单信息", Me)
    If Not mdctPermissionList("") Then
        Exit Sub
    End If
    ApplyTheme Me
    On Error Resume Next
    Me.Cmd4.Enabled = mdctPermissionList("修改")
End Sub