主题：提问能学到知识就有瘾

 逻辑是什么啊

Dim ary1() As String = {"abc","qwe","zxc","wer","ert"}
Dim ary2() As String = {"abd","qwp","zxd","wep","erd","fff","ggg"}

For Each s1 As String In ary1
    For Each s2 As String In ary2
       
    Next
Next

Dim ary1() As String = {"abc","qwe","zxc","wer","ert"}
Dim ary2() As String = {"abd","qwp","zxd","wep","erd","fff","ggg"}

For Each s1 As String In ary1
    If array.Indexof(ary2, s1) = -1 Then
        output.Show(s1)
    End If
Next

output.show("-------------------------------")

For Each s2 As String In ary2
    If array.Indexof(ary1, s2) = -1 Then
        output.Show(s2)
    End If
Next

比较第一个、相同就第二个，再相同就第三个。