Fecha y hora Ejercicio VB.Net - Curso de Programación Visual Basic

Imports System
Class DateAndTime1
    Private Shared Sub Main()
        Dim day As String = DateTime.Now.Day.ToString("00")
        Dim month As String = GetMonth(DateTime.Now.Month)
        Dim year As Integer = DateTime.Now.Year
        Dim time As String = DateTime.Now.ToLongTimeString()
        Console.WriteLine("Today is {0} of {1} of {2}. It´s {3}.", day, month, year, time)
    End Sub

    Private Shared Function GetMonth(ByVal numberMonth As Integer) As String
        Dim months As String() = New String() {"January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "Decenber"}
        Return months(numberMonth - 1)
    End Function
End Class