出现“空”列，是何原因？

代码：

Dim g As New CrossTableBuilder("统计表1", DataTables("合同"))
g.HGroups.AddDef("品号")
g.VGroups.AddDef("年", "{0}年")
g.VGroups.AddDef("月", "{0}月")
g.Totals.AddDef("数量", "数量")
g.FromServer = True
g.Build()
MainTable = Tables("统计表1")

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

用下列代码就没有

Dim g As New CrossTableBuilder("统计表1", DataTables("合同"))
g.HGroups.AddDef("品号")
g.VGroups.AddDef("日期", DateGroupEnum.Year, "{0}年")
g.VGroups.AddDef("日期", "{0}月")
g.Totals.AddDef("数量", "数量")
g.FromServer = True
g.Build()
MainTable = Tables("统计表1")

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

因为公司月底盘点时间为23日，日期就不一样。第一组代码 月份23日-下月22日为一个月，第二组代码月份1日-月底，请分析为什么，如何解决

因为年或月这一列有空值列，解决办法：

Dim g As New CrossTableBuilder("统计表1", DataTables("合同"))
g.HGroups.AddDef("品号")
g.VGroups.AddDef("年", "{0}年")
g.VGroups.AddDef("月", "{0}月")
g.Totals.AddDef("数量", "数量")
g.FromServer = True

g.Filter = "年 Is Not Null And 月 Is Not Null"
g.Build()
MainTable = Tables("统计表1")