Public Class Tester Public Shared Sub Main Dim testDate As String Dim results As New System.Text.StringBuilder ' ----- Test a time. testDate = "23:57:58" If (IsDate(testDate) = True) Then _ results.AppendLine(Date.Parse(testDate).ToString) Console.WriteLine(results.ToString()) End Sub End Class
11/05/2007 11:57:58 PM