主题：多字段统计

任何一种统计都可以，例如汇总模式：

 

Dim t As Table = Tables("客户评价")
Dim g As SubtotalGroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False
t.SpillNode = True

g = New SubtotalGroup
g.Aggregate = AggregateEnum.Average
g.GroupOn = "*"
g.TotalOn = "服务满意度,产品满意度,售后满意度,总体评价"
g.Caption = "平均"
t.SubtotalGroups.Add(g)

t.Subtotal()

 

提示：

 

1、日期列遇到第一列位置。

2、其他列改为双精度小数。

看看这个:

 

http://www.foxtable.com/help/topics/0681.htm