Dim Names1 As New List(Of String) Names1.Add( "电视机") Names1.Add("电冰箱") Names1.Add("洗衣机") Dim Names2 As New List(Of String) Names2.Add( "电视机") Names2.Add("电冰箱") Names2.Add("洗衣机") If names1.count <> names2.count Then Return False If String.Join("",names1.ToArray()) <> String.Join("",Names2 .ToArray()) Then Return False