Date Time VB.Net

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