If e.Row("管理单位") <> user.GROUP OrElse user.GROUP <> "高科控股集团" OrElse user.NAME <> "管理员" OrElse user.NAME <> "开发者" Then
e.Cancel = true
Else
'控制代码
End If