Imports System

Public Module Module1

    Public Sub Main()

         Dim now As DateTime = DateTime.Now

        Console.WriteLine(now.ToString("F"))

​

​

    End Sub

End Module