Date Time VB.Net Tutorial

Module Tester
    Public Sub Main()
        Dim dtNow As Date = Now
        dtNow = Today
        Console.WriteLine("Current date: {0}", dtNow)
    End Sub
End Module
Current date: 11/05/2007 12:00:00 AM