Imports System

Public Module Module1

    Public Sub Main()

        dim today as datetime=datetime.Now

        console.Write("today is my favorite day")

        console.Write(today.ToString("F"))

    End Sub

End Module