Dim nms1 As String() = {"客户编码","客户名称"} '指定连接列Dim nms2 As String() = {"客户编码","单位编码"} '指定连接列
dt5.Combine(nms1,dt1,nms1) '将销售统计数据组合到进货统计数据dt5.Combine(nms1,dt2,nms2) '将退货统计数据组合到进货统计数据dt5.Show("统计表5")