e.Form.Controls("TabControl1").SelectedIndex = 1 Dim g As New GroupTableBuilder("统计表1", DataTables("订单表")) g.Groups.AddDef("签约日期", DateGroupEnum.Year, "年") g.Groups.AddDef("签约日期", "月") g.Totals.AddDef("成交金额") g.VerticalTotal = True g.SubTotal = True g.FromServer = True Tables("赢单管理_Table3").DataSource = g.BuildDataSource()
|