主题：交叉统计

生成以后，列名是不规则的，你需要用判断列标题的方法去判断得到列名。

具体，你上传一个例子吧。

测试了一下，没有问题

Dim t As Table = Tables("窗口1_table1")
Dim dt As DataTable = DataTables("a")
Dim b As new  CrossTableBuilder("统计表1",dt)
b.HGroups.AddDef("仓库名称")
b.HGroups.AddDef("一级码")
b.HGroups.AddDef("品名")
b.HGroups.AddDef("规格型号")
b.HGroups.AddDef("单位")
b.VGroups.AddDef("方向")
b.Totals.AddDef("实收数量")
b.Build
t.DataSource  = b.BuildDataSource
Dim nlist As new Dictionary(of String,String)
For Each c As DataCol In t.DataTable.DataCols
    nlist.Add(c.Caption,c.Name)
Next
With t.DataTable.dataCols
  .Add("库存数量",Gettype(Single),"Isnull([" & nlist("入库") & "],0) - IsNULL([" &  nlist("出库") & "],0)")
End With

如果是sql语句，很麻烦的。不建议做。

参考 http://blog.csdn.net/a411255074/article/details/7333161