以下是引用a2029460在2016/8/10 14:38:00的发言：
ps：如果不要商品名称我已经实现了，但老板必须要显示商品名称，没办法了，他以前用的软件的数据表就是这么设计的， 我无法更改，只能求各位了！
生成的表格以后，动态加入一列，然后跨表引用商品名称就好啊
Dim dt As DataTable = DataTables("统计表")
dt.DataCols.Add("商品名称", Gettype(String))
For Each dr As DataRow In dt.DataRows
Dim fdr As DataRow = DataTables("商品档案").Find("商品编号 = '" & dr("商品编号") & "'")
If fdr IsNot Nothing Then
dr("商品名称") = fdr("商品名称")
End If
Next
加好友 
发短信
Post By：2016/8/10 15:08:00 [只看该作者]
