设计交叉统计表如下:Dim g As New CrossTableBuilder("计划执行情况表", DataTables("jh"), "[xmrq] Is Not Null")g.Caption = "计划执行情况表"g.HGroups.AddDef("nd")g.VGroups.AddDef("xmrq", DateGroupEnum.Year, "{0}年")g.VGroups.AddDef("xmrq", "{0}月")g.Totals.AddDef("xmbh", AggregateEnum.Count, "项目数量")g.Totals.AddDef("xmys", "项目预算")g.HorizontalTotal = Trueg.Decimals = 2g.Filter = "[xmrq] Is Not Null"g.Build()MainTable = Tables("计划执行情况表")
执行后,生成临时表与其他数据表在一起。想在计划执行窗口中Table1表打开此表,并指定列名和列宽。请老师指教!