Module ArrayLength Sub Main() Dim array() As String = {"apple", "orange"} Console.WriteLine(array.Length) End Sub End Module