以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何从两个表的指定列中 合并取得不重复的值?  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=118673)

--  作者:奶粉大王
--  发布时间:2018/5/8 17:07:00
--  [求助]如何从两个表的指定列中 合并取得不重复的值?
如题~~~~
--  作者:y2287958
--  发布时间:2018/5/8 17:12:00
--  
用集合
--  作者:奶粉大王
--  发布时间:2018/5/8 17:18:00
--  
详细点 图片点击可在新窗口打开查看
--  作者:有点甜
--  发布时间:2018/5/8 17:26:00
--  

参考代码

 

Dim ls1 As List(Of String) = DataTables("表A").GetValues("第一列")
Dim ls2 As List(Of String) = DataTables("表B").GetValues("第一列")
For Each s As String In ls2
    If ls1.Contains(s) = False Then
        ls1.add(s)
    End If
Next

msgbox(String.Join(",", ls1.ToArray))