【快速开发平台】权限控制数据表窗体表的显示与隐藏

时　间:2017-01-06 08:36:11
作　者:缪炜   ID：24010  城市：江阴
摘　要:在实际开发中，经常会遇到有些数据列需要有权限者才可以查看的情况。以下是针对进销存里的商品信息做一个简单的说明。比如：现在需要对几个价格做权限设置。

正　文:

1、 先在权限设置中添加权限，如图1

                                                 图1

2、 在窗体frm商品信息的打开事件里添加代码，如图2

                                              图2

If mdctPermissionList("价格") = True Then
        Me.sfrList!最新进价.ColumnHidden = False
        Me.sfrList!售价.ColumnHidden = False
        Me.sfrList!成本价.ColumnHidden = False
        Me.sfrList!最新进价.ColumnHidden = False

    Else
        Me.sfrList!最新进价.ColumnHidden = True
        Me.sfrList!售价.ColumnHidden = True
        Me.sfrList!成本价.ColumnHidden = True
        Me.sfrList!最新进价.ColumnHidden = True
End If