主题：专业报表_分组统计问题

求教： 在专业报表的分组统计中时，用如下代码可以正常输出报表结果，但是用最后两行释代码替代就无正确的报表输出。

是那里写错了吗？

 

 

 

Dim Agg1 As New prt.DataBinding.Aggregate("cqsjSum")

Dim Agg2 As New prt.DataBinding.Aggregate("ybjsSum")                 

 

agg1.DataBinding = ra.DataBinding

agg1.Running = 1                                                  '分组统计

agg1.Expressi = “Fields!cqsj.value"                     '统计字段

doc.DataSchema.Aggregates.Add(agg1)              '定义好的统计必须添加到报表的DataSchema中

 

agg2.DataBinding = ra.DataBinding

agg2.Running = 1                                                   '分组统计

agg2.Expressi =  “Fields!ybjs.value"       '统计字段

doc.DataSchema.Aggregates.Add(agg2)               '定义好的统计必须添加到报表的DataSchema中

 

 

'doc.DataSchema.Aggregates.Add(New prt.DataBinding.Aggregate("cqsjsum", "Fields!cqsj.Value", ra.DataBinding, 1, 0))

'doc.DataSchema.Aggregates.Add(New prt.DataBinding.Aggregate("ybjssum", "Fields!ybjs.Value", ra.DataBinding, 1, 0))