If User.Group = "A" orelse User.Group = "B" Then
DataTables("信息").LoadFilter = ""
Else
DataTables("信息").LoadFilter = "编号= '" & User.Group & "'"
End If
DataTables("信息").Load()
参考:http://www.foxtable.com/webhelp/topics/0220.htm