Date Time VB.Net

Imports System.IO
Module Module1
    Sub Main()
        Dim Dt As DateTime = Now()
        Console.WriteLine("Long date: " & Dt.ToLongDateString)
        Console.WriteLine("Short date: " & Dt.ToShortDateString)
        Console.WriteLine("Long time: " & Dt.ToLongTimeString)
        Console.WriteLine("Short time: " & Dt.ToShortTimeString)
        Console.WriteLine("Universal time: " & Dt.ToUniversalTime)
    End Sub
End Module