Imports System

Public Module Module1

    Public Sub Main()

        ' An array.

        Dim arr() As Integer = {10, 20, 30}

​

        ' Search for a value that does not exist.

        Dim result As Integer = Array.IndexOf(arr, 100)

        Console.WriteLine(result)

    End Sub

End Module