你然可以设计筛选树,那么如何合成条件您已经会了,只需在融合下面的知识:
http://www.foxtable.com/help/topics/2256.htm
Dim flt As String
根据合成条件
If Flt > "" then
If User.Name = "张经理" Then
DataTables("订单").LoadFilter = flt
Else
DataTables("订单").LoadFilter = flt & " And 业务员 = '" & User.Name & "'"
End If
DataTables("订单").Load()
End If