Question

How to initialize a HashSet from an array in VB.NET

Answer 1

Imports System
Imports System.Collections.Generic

Public Class Program
    Public Shared Sub addToSet(ByVal arr As Integer(), ByVal hset As HashSet(Of Integer))
        For i As Integer = 0 To arr.Length - 1
            hset.Add(arr(i))
        Next
    End Sub

    Public Shared Sub Main()
        Dim arr As Integer() = {1, 5, 7, 3, 9, 8, 0, 2}
        Dim hset As HashSet(Of Integer) = New HashSet(Of Integer)()
	
        addToSet(arr, hset)

        For Each item In hset
            Console.Write(item & " ")
        Next
    End Sub
End Class






' run:
'
' 1 5 7 3 9 8 0 2
'

 

70+ SQL courses for beginners and professionals

Answer 2

Imports System
Imports System.Collections.Generic

Public Class Program
	Public Shared Sub Main()
        Dim arr As Integer() = {4, 6, 12, 3, 100, 99, 7, 0, 1}

        Dim hashset = New HashSet(Of Integer)(arr)

        For Each item In hashset
            Console.Write(item & " ")
        Next
    End Sub
End Class







' run:
'
' 4 6 12 3 100 99 7 0 1
'

 

70+ SQL courses for beginners and professionals