主题：[求助]关于日期空值的问题

我有一张表，有个字段是发货日期，在生成统计时用日期进行分组，空值的表头该怎么设置？比方空值的表头设为未发货

 交叉统计？

 

For each c as col in tables("表A").cols
    If c.Caption.Contains("空") Then
        c.Caption = c.Caption.Replace("空", "未发货")
    End If
Next
Tables("表A").DataTable.BuildHeader

大红袍老师，这段代码应该放在哪个位置？好像不行。是交叉统计 是在窗口中的按键的代码

Dim g As New CrossTableBuilder("统计表1", DataTables("出口情况表"))
g.H Groups.AddDef("客户")
'g.V Groups.AddDef("是否发货","已发货|未发货")
For E ach c As Col In Tables("统计表1").cols
'mes sagebox.show(c.caption)
If c.Caption.Contains("空") Then
c.Caption = c.Caption.Replace("空", "未发货")
'me ssagebox.show(c.caption)
E nd If
Next
Tab les("统计表1").DataTable.BuildHeader
g.V Groups.AddDef("发货日期", DateGroupEnum.Year, "{0}年")
g.To tals.AddDef("净重", "净重")
g.To tals.AddDef("总值", "总值")
g.To tals.AddDef("预付款", "预付款")
g.To tals.AddDef("收货款", "收货款")
g.To tals.AddDef("扣款", "扣款")
g.To tals.AddDef("余款", "余款")
g.To tals.AddDef("发货日期", AggregateEnum.Count, "发货次数")
g.Ho rizontalTotal = True
g.V erticalTotal = True
g.D ecimals = 2
g.B uild()
Tab les("出口情况查询_Table2").DataSource = g.BuildDataSource()
Tab les("出口情况查询_table2").Cols.Frozen = 1
Tab les("出口情况查询_table2").AutoSizeCols

写到最后

 

Dim t As Table = Tables("出口情况查询_Table2")

For each c as col in t.cols
    If c.Caption.Contains("空") Then
        c.Caption = c.Caption.Replace("空", "未发货")
    End If
Next
t.DataTable.BuildHeader

OK,刚好自己也调试成功了。