Imports System Public Class MainClass Shared Sub Main(ByVal args As String()) Dim values(10) As Integer For i As Integer = 0 To 10 values(i) = i Next i Console.WriteLine(Array.IndexOf(values, 6).ToString) Console.WriteLine(Array.LastIndexOf(values, 3).ToString) End Sub End Class