Dim numbers As New List(Of Integer)(New Integer() {1, 2, 3, 4, 5, 3})
Dim distinctList As List(Of Integer) = numbers.Distinct.ToList
For Each item As Integer In distinctList
Console.WriteLine(item)
Next
End Sub
----------------------
Output
1
2
3
4
5