Foxtable(狐表)用户栏目专家坐堂 → [求助]如何将两个集合合并成一个集合,并排除相同的元素


  共有2430人关注过本帖平板打印复制链接

主题:[求助]如何将两个集合合并成一个集合,并排除相同的元素

帅哥哟,离线,有人找我吗?
夏许多雪
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:109 积分:1178 威望:0 精华:0 注册:2018/2/25 13:54:00
[求助]如何将两个集合合并成一个集合,并排除相同的元素  发帖心情 Post By:2019/6/11 16:47:00 [只看该作者]

有两个集合 sb1s和 sb2s,各包括几个数组元素,要求将两个集合合并成一个集合,并将相同元素只取一个值,按下列程序运行后,是将两个集合全部合并,并没有去除相同元素,请帮忙看一下哪里不对。

Dim sb1s As List(of String())
sb1s = DataTables("职卫明细").GetValues("仪器编号1|仪器型号1|仪器名称1","仪器编号1 > ''") 
Dim sb2s As List(of String())
sb2s = DataTables("职卫明细").GetValues("仪器编号2|仪器型号2|仪器名称2","仪器编号2 > ''")  
If sb2s.Count > 0 Then
For i As Integer = 0 To sb2s.count - 1
If sb1s.Contains(sb2s(i)) = False Then
sb1s.Add(sb2s(i))
End If
Next
End If

 回到顶部