Question

How to count the unique elements of an array in VB.NET

Answer 1

Imports System

Public Class Program
    Public Shared Sub Main()
        Dim arr As Integer() = {4, 1, 2, 8, 9, 5, 1, 7, 8, 8, 8}
        Dim frequency As Integer() = New Integer(9) {}

        For i As Integer = 0 To arr.Length - 1
            frequency(arr(i)) += 1
        Next

        Dim count As Integer = 0

        For i As Integer = 0 To 10 - 1
            If frequency(i) = 1 Then count += 1
        Next

        Console.WriteLine(count)
    End Sub
End Class

	
	

	
	
' run:
'	
' 5
'

 

70+ SQL courses for beginners and professionals