主题：新版问题：“设置汇总模式”自动生成的代码不能引用

是的，要点击两次才可执行，前两天有人提过，这样可以：
for i as integer = 0 to 1
    Dim t As Table = Tables("流水表")
    Dim g As SubtotalGroup
    t.SubtotalGroups.Clear()
    t.GroupAboveData = False
    t.TreeVisible = False
   
    g = New SubtotalGroup
    g.Aggregate = AggregateEnum.Sum
    g.GroupOn = "*"
    g.TotalOn = "正课,辅导,补课,甘孜班_守班,甘孜班_补课,甘孜班_辅导,甘孜班_巡查"
    g.Caption = "总计"
    t.SubtotalGroups.Add(g)
   
    t.Subtotal()   
next

行数多时，一直没有办法让最下面的汇总行显示在可见行中，要拉下滚动条 或 向下的按钮。
最好能用.position定位到汇总行 ···