Mega Code Archive

 
Categories / VB.Net / Date Time
 

Is input value a Date

Public Class MainClass     Public Shared Sub Main()         System.Console.WriteLine(IsDate("your input"))     End Sub     Public Shared Function IsDate(ByVal DateIn As String) As Boolean         Dim datDateTime As DateTime         Dim blnIsDate As Boolean = True         Try             datDateTime = DateTime.Parse(DateIn)         Catch e As FormatException             blnIsDate = False         End Try         Return blnIsDate     End Function End Class