Imports System
Public Module Module1
Public Sub Main()
Dim week() as String = {"Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday", "Saturday"}
Console.Writeline(week(0))
Console.Writeline(week(1))
Console.Writeline(week(2))
End Sub
End Module