public class Test public Shared Sub Main Dim values(10) As Integer For i As Integer = 0 To 10 values(i) = i Next i Console.WriteLine(Array.IndexOf(values, 6).ToString) End Sub End class 6