Question

How to check whether an array is subset of another array in VB.NET

Answer 1

Imports System

Public Class Program
    Public Shared Function isSubset(ByVal arr1 As Integer(), ByVal arr2 As Integer()) As Boolean
        Dim size1 As Integer = arr1.Length, size2 As Integer = arr2.Length
        Dim j As Integer

        For i As Integer = 0 To size2 - 1
            For j = 0 To size1 - 1
                If arr2(i) = arr1(j) Then Exit For
            Next

            If j = size1 Then Return False
        Next

        Return True
    End Function

    Public Shared Sub Main()
        Dim arr1 As Integer() = {5, 1, 8, 12, 40, 7, 9, 100}
        Dim arr2 As Integer() = {8, 40, 9, 1}

        If isSubset(arr1, arr2) Then
            Console.Write("yes")
        Else
            Console.Write("no")
        End If
    End Sub
End Class




' run:
'
' yes
'

 

70+ SQL courses for beginners and professionals