Imports System
Imports System.Collections.Generic
Public Class Program
Public Shared Sub Main()
Dim list1 = New List(Of String)() From {"A", "B", "C", "D", "E", "A"}
Dim list2 = New List(Of String)() From {"A", "E", "D", "B", "B", "C", "D"}
Dim list1Set = New HashSet(Of String)(list1)
Dim list2Set = New HashSet(Of String)(list2)
Dim isEqual As Boolean = list1Set.SetEquals(list2Set)
Console.WriteLine(isEqual)
End Sub
End Class
' run:
'
' True
'