主题：统计汇总求助

这是成品出仓统计汇总

If Forms("成品出仓统计汇总").Opened Then
    Dim g As New CrossTableBuilder("成品出仓统计汇总", DataTables("成品出仓"))
    g.HGroups.AddDef("产品分类")
    g.HGroups.AddDef("型号")
    g.HGroups.AddDef("规格")
    g.HGroups.AddDef("用户")
    'g.VGroups.AddDef("接单日期",DateGroupEnum.Year,"{0}年")
    g.VGroups.AddDef("出仓日期", "{0}月份")
    g.Totals.AddDef("出仓数量", "出仓数量")
    g.OrderByTotal = True
    g.HorizontalTotal = True
    g.Filter = "出仓日期 Is Not Null"
    g.Build()
End If

Tables("成品出仓统计汇总_成品出仓统计汇总表").DataSource = DataTables("成品出仓统计汇总")

以下是截图

此主题相关图片如下：snap1.jpg

我希望1、控制临时汇总表的列宽（产品分类、型号、规格等）；2、月份改为201105显示（2011年5月）

1、在按月汇总的临时表中1-12月用SetColVisibleWidth怎么设置？

2、我已在表中已将出仓日期转换为201101-201112月份模式，我希望在临时汇总表中显示201101，而不是20111月

月份问题已解决，列宽的问题还是有些不清楚。1楼的图中已列出字段，麻烦帮我写一下。不好意思，先谢了。