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