Assign Date value in format: #5/5/1967 6:41:00 AM#
Imports System
Public Class MainClass
Shared Sub Main()
Dim dteData As Date
dteData = #5/5/1967 6:41:00 AM#
'Display the date and time
System.Console.WriteLine(dteData.ToLongDateString & " " & _
dteData.ToLongTimeString)
End Sub
End Class