分组行的位置

分组行默认在数据行之下，如果你喜欢，也可以先显示分组行，再显示数据行，如下图所示：

如果希望分组行位于数据行之上，只需将Table的GroupAboveData属性设置为True即可，例如：

Dim t As Table = Tables("订单")
t.GroupAboveData = True '指定分组行位于数据行之上
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
g = New Subtotalgroup
g.GroupOn = "客户"
g.TotalOn = "数量,金额"
t.SubtotalGroups.Add(g)
g = New Subtotalgroup
g.GroupOn = "产品"
g.TotalOn = "数量,金额"
t.SubtotalGroups.Add(g)
g = New Subtotalgroup
g.GroupOn = "*"
g.TotalOn = "数量,金额"
t.SubtotalGroups.Add(g)
t.Subtotal()

提示：如果要进行截止统计，不能设置分组行位于数据行之上。