'Below all not working correctly Dim value1 As String = "100-10-6-1" Dim inta As DateTime If (Not DateTime.TryParse(value1, inta)) Then ShowMessage("This is not date field !") Exit Sub End If '-------------------------------------- Dim value1 As String = "100-10-6-1" 'Here if give "11-11-11" also goes else part If stringSplit(inti).[GetType]() Is GetType(DateTime) Then ShowMessage("This is date field !") Else ShowMessage("This is not date field !") End If
string
DataTime
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)