Set Operators Intersect
Imports System.IO
Imports System.Reflection
Imports System.Linq
Imports System.Xml.Linq
Public Class MainClass
Public Shared Sub Main
Dim numbersA() As Integer = {0, 2, 4, 5, 6, 8, 9}
Dim numbersB() As Integer = {1, 3, 5, 7, 8}
Dim commonNumbers = numbersA.Intersect(numbersB)
Console.WriteLine("Common numbers shared by both arrays:")
For Each n In commonNumbers
Console.WriteLine(n)
Next
End Sub
End Class
Related examples in the same category