Module Test
Public Sub Main()
Dim sMonths() As String = {"Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", Oct", "Nov", "Dec"}
Console.WriteLine("Eleventh month of the year = {0}", sMonths(10))
End Sub
End Module
Eleventh month of the year = Nov