If getparameter("current user role name", dbText, Null) = "订单管理" Then  '如果这个权限组是订单管理
Me.sfrDetail.Form.类别.Tag = ""             
Me.sfrDetail.Form.数量.Tag = ""
Me.sfrDetail.Form.交期.Tag = ""
Else
Me.sfrDetail.Form.类别.Tag = ""
Me.sfrDetail.Form.数量.Tag = ""
Me.sfrDetail.Form.交期.Tag = ""

End If

备注：放在控件的属性的其他标签是一样的效果