Date and time Learn programming Visual Basic (VB.net)

Lesson:

Additional Libraries


Exercise:

Date and time 18


Objetive:

Create a program to display the current date and time with the following format:

Today is 6 of February of 2015. It´s 03:23:12


Code:

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