Date Time VB.Net

Imports System
Imports System.Threading
Imports System.Globalization
Class Sample
    Public Shared Sub Main() 
        Dim myDateTime As New DateTime(2011, 5, 16, 3, 2, 15)
        Dim ci As CultureInfo = Thread.CurrentThread.CurrentCulture
        Console.WriteLine("Current culture: ""{0}" & vbCrLf, ci.Name)
        Console.WriteLine("Long date pattern: ""{0}""", ci.DateTimeFormat.LongDatePattern)
        Console.WriteLine("Long date string:  ""{0}" & vbCrLf, myDateTime.ToLongDateString())
    End Sub
End Class