Imports System.Collections public class Test public Shared Sub Main Dim StringArray() As String = {"This", "is", "a", "test"} Dim E As IEnumerator = StringArray.GetEnumerator() While (E.MoveNext()) Console.WriteLine(E.Current()) End While Console.WriteLine(Array.IndexOf(StringArray, "test")) End Sub End class
This is a test 3