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(System.Globalization.CultureInfo.CreateSpecificCulture("fr-FR"))) End Sub End Class