主题：请教，如何使用统计工具来实现？

dt 为数据表，有统计条件，单据状态，数量三列内容。

'    For Each nm As String In dt.GetUniqueValues("","统计条件")
'        Dim dr As DataRow = DataTables("统计").AddNew()
'        dr("统计条件") = nm
'        Dim Total1 As String = dt.Compute("sum(数量)","统计条件 = '"& nm &"'")  
'        Dim Total2 As String = dt.Compute("sum(数量)","([单据状态] = '已发货' or [单据状态] = '已交货' or [单据状态] = '已回未取' or [单据状态] = '已取单') and 统计条件 = '"& nm &"'")
 '       dr("总托单数") = Total1
'        dr("已回回单") = dt.Compute("sum(数量)","([单据状态] = '已回未取' or [单据状态] = '已取单') and 统计条件 = '"& nm &"'")
'        dr("未回回单") = Total2 - dr("已回回单")
 '       dr("已取单数") = dt.Compute("sum(数量)","[单据状态] = '已取单' and 统计条件 = '"& nm &"'")
'        dr("未取单数") = Total2 - dr("已取单数")
'        dr("已出库数") = Total2
'        dr("未出库数") = Total1 - Total2
'        dr("已交货数") = dt.Compute("sum(数量)","([单据状态] = '已交货' or [单据状态] = '已回未取' or [单据状态] = '已取单') and 统计条件 = '"& nm &"'")
'        dr("未交货数") = Total2 - dr("已交货数")
'    Next
以上如何用CrossTableBuilder来实现呢？