以文本方式查看主题 -  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp) --  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2) ----  把相同列内容中所对应的数值合并到另一个单元格中  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=4920)

--  作者：卟离卟弃 --  发布时间：2009/11/9 10:10:00 --  把相同列内容中所对应的数值合并到另一个单元格中 此主题相关图片如下：qq截图未命名.png 如图1，物料型号  A所适用的成品型号有4种 此主题相关图片如下：02.png 用什么样的代码能达到图二的效果。。 在B表中根据物料型号，查找表A内容，将符合条件的内容合并到表B的适用成品型号中

--  作者：狐狸爸爸 --  发布时间：2009/11/9 10:51:00 --   Dim lst As New List(of String) Dim rst As New List(of DataRow ) Dim Val As String For each dr As DataRow in DataTables("表A").DataRows     if dr.IsNull("第一列") = False Andalso lst.Contains(dr("第一列")) = False         lst.Add(dr("第一列"))         val = ""         For Each dr2 As DataRow in DataTables("表A").Select("第一列 = \'"  & dr("第一列") & "\'" )             val = val & dr2("第二列") & ","         Next         dr("第二列") = val.trim("\'")     Else         rst.Add(dr)     End If Next For each dr As DataRow in rst     dr.Delete Next

--  作者：PETERD --  发布时间：2011/10/16 13:03:00 --  [求助]求教怎么将合并多列数据 根据配送单号，合并所对应的数据，如图合并后的效果

--  作者：PETERD --  发布时间：2011/10/16 13:04:00 --   此主题相关图片如下：无标题.png