你然可以设计筛选树,那么如何合成条件您已经会了,只需在融合下面的知识: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