Imports System
Imports System.Globalization
Imports Microsoft.VisualBasic
Class Sample
Public Shared Sub Main()
Dim dateString As String = "5/1/2010 8:30:52 AM"
Dim date1 As Date = Date.Parse(dateString, System.Globalization.CultureInfo.InvariantCulture)
End Sub
End Class