If e.DataTableName = "表A"
e.selectString = "select * from {表A} where 创建人 = '" & e.User.Name & "'"
End If
If e.DataTableName = "表A" AndAlso e.User.Group = "审核" Then
e.selectString = "select * from {表A} where 金额 Is not Null"
End If
If e.DataTableName = "表A" AndAlso e.User.Group = "总经理" Then
e.selectString = "select * from {表A}"
End If