Date Time VB.Net

Imports System
Imports System.Globalization
Imports Microsoft.VisualBasic
Public Class SamplesDTFI
   Public Shared Sub Main()
      Dim myDTFI As DateTimeFormatInfo = New CultureInfo("en-US", False).DateTimeFormat
      Dim myDT As New DateTime(2010, 1, 3)
      Console.WriteLine("        {0} {1}", myDTFI.ShortDatePattern, "(ShortDatePattern)")
   End Sub
End Class