数组集合是无法使用Contains进行判断的,试试下面代码就明白了
Dim str() As String = {"1","2"}
Dim str2() As String = {"1","2"}
Dim sb1s As new List(of String())
sb1s.Add(str)
Output.Show(sb1s.Contains(str2))
这样就可以
Dim sb1s As List(of String)
sb1s = DataTables("职卫明细").SQLGetValues("仪器编号1 + ',' + 仪器型号1 + ',' + 仪器名称1","仪器编号1 > ''")
Dim sb2s As List(of String)
sb2s = DataTables("职卫明细").SQLGetValues("仪器编号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
For i As Integer = 0 To sb1s.Count - 1
Output.Show(sb1s(i))
Next