Rss & SiteMap
Foxtable(狐表) http://www.foxtable.com
Dim b As New GroupTableBuilder("统计表1",DataTables("订单"))
b.Groups.AddDef("日期","月份")
b.Totals.AddDef("数量")
Tables("窗口1_Table1").DataSource = b.BuildDataSource()
我测试了一下,这段代码可以在窗口表里显示统计结果的.而这一段只显示颜色字段:
Dim g As New CrossTableBuilder("输入", DataTables("表A")) g.HGroups.AddDef("颜色") g.VGroups.AddDef("尺码") g.Totals.AddDef("数量", "数量") g.HorizontalTotal = True g.VerticalTotal = True g.Horiz g.VerticalProporti g.Build() Tables("窗口1_Table1").DataSource = g.BuildDataSource() 我看过帮助. GroupTableBuilder
CrossTableBuilder
SQLGroupTableBuilder
SQLCrossTableBuilder
DataTableBuilder
都有DataSource属性呀!
Dim g As New CrossTableBuilder("输入", DataTables("表A"))
g.HGroups.AddDef("颜色")
g.VGroups.AddDef("尺码")
g.Totals.AddDef("数量", "数量")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Horiz
g.VerticalProporti
g.Build()
Tables("窗口1_Table1").DataSource = g.BuildDataSource()
只显示颜色字段 下载信息 [文件大小: 下载次数: ] 点击浏览该文件:尺码分配.table
呵呵,加粗的有问题,应该屏蔽,因为列名和标题不同的,你用常规统计得出一个表,看看各列的实际列名是什么,就明白了:
Dim g As New CrossTableBuilder("输入", DataTables("表A"))
g.HGroups.AddDef("颜色")
g.VGroups.AddDef("尺码")
g.Totals.AddDef("数量", "数量")
g.HorizontalTotal = True
g.VerticalTotal = True
g.Horiz
g.VerticalProporti
Tables("窗口1_Table1").DataSource = g.BuildDataSource()
'Tables("窗口1_Table1").SetColVisibleWidth("颜色|90|XS|90|S|120|M|120|L|60|XL|60|XXL|60|XXXL|60|TOTAL|60")
Tables("窗口1_Table1").AllowEdit = True
另外你多了一个Build
只能用SetColVisibleWidth的