1: 2: 3: 4: 5: 6:
Dim ndate As DateTime Dim ndatestr As String = "03/24/10" If DateTime.TryParse("ndatestr", ndate) Then ndate = new DateTime(ndate.Year + 1, 3, 1) End If