主题：[求助]如何在报表前进行可变的筛选设计？

我的项目中有三列 分别是 金额 、业务类型 和 起始日期，想制作一个窗口在生成报表之前提示填写 起始时间 和 业务类型，这两项可以不填，不填时默认对所有数据统计生成金额的合计报表，如果填写的话，就针对所填写的内容进行筛选，筛选出晚于起始时间并且等于业务类型的行，然后合计这些行的金额。请问老师可否实现？我该如何做？

 先筛选，再生成报表

 

http://www.foxtable.com/webhelp/scr/1058.htm

 

请问如何控制筛选完成再继续生成报表呢？这个筛选框会跟报表同时运行，该如何控制呢

 

用代码生成报表

 

http://www.foxtable.com/webhelp/scr/1145.htm

 

按照老师所说做成了筛选，但是统计的结果还是按全部的数据统计的，请问我该如何修改？

 

做一个对应的例子发上来看看。

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.rar

改代码

 

Dim sum As Double = 0
For Each dr As Row In Tables("表A").Rows
    sum += dr("r10")
Next
vars("je") = sum

 

Dim Book As New XLS.Book(ProjectPath & "Attachments\金额统计表.xls")
Dim fl As String = ProjectPath & "Reports\金额统计表.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()

vars("je") = DataTables("表A").compute("sum(r10)", filter)

vars("je") = Tables("表A").compute("sum(r10)")