Parse string with date but no time component
Imports System.Globalization Module MainClass Public Sub Main() Dim dateValue As Date Dim dateString As String = "2/16/2010 12:15:12 PM" dateString = "2/16/2008" Try dateValue = Date.Parse(dateString) Console.WriteLine("'{0}' converted to {1}.", dateString, dateValue) Catch e As FormatException Console.WriteLine("Unable to convert '{0}'.", dateString) End Try End Sub End Module