Imports System
Imports System.Globalization
Class Sample
Public Shared Sub Main()
Dim result As Boolean
Dim datetimeVal As DateTime
Dim ci As CultureInfo
ci = New CultureInfo("fr-FR")
result = DateTime.TryParse("4/7/2004 12:34:56", ci, DateTimeStyles.None, datetimeVal)
Console.WriteLine(datetimeVal.ToString())
End Sub
End Class