Imports System Imports System.Globalization Imports Microsoft.VisualBasic Class Sample Public Shared Sub Main() Dim date1 As Date = #3/1/2010 7:00AM# Console.WriteLine(date1.ToString("F", New System.Globalization.CultureInfo("fr-FR"))) End Sub End Class