dcsimg
Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX

By submitting your information, you agree that devx.com may send you DevX offers via email, phone and text message, as well as email offers about other products and services that DevX believes may be of interest to you. DevX will process your information in accordance with the Quinstreet Privacy Policy.


Tip of the Day
Language: VB7
Expertise: beginner
Dec 23, 2002

WEBINAR:

On-Demand

Building the Right Environment to Support AI, Machine Learning and Deep Learning


Parsing and validating string dates

If you have a string variable that should specify a date (asked in input to the user, for example), you can parse the string and get a Date variable by using the Date.Parse method. If the input string is not in a valid format, this method throws an exception though. Follows a routine that parses a string and sets a Date variable passed in input by reference, or returns False if the input string could not recognized as a valid date:

' Set the input Date variable by parsing the input string
' Return true if the input string is not in a valid format
' Example:
'   Dim testDate As Date
'   If String2Date(testDate, "12/25/2002") = True Then
'       MessageBox.Show(testDate.ToLongDateString())
'   Else
'       MessageBox.Show("Invalid input date string")
'   End If
'   If String2Date(testDate, "12/35/2002") = True Then
'       MessageBox.Show(testDate.ToLongDateString())
'   Else
'       MessageBox.Show("Invalid input date string")
'   End If

Function String2Date(ByRef retDate As Date, ByVal value As String) As Boolean
    Try
        retDate = Date.Parse(value)
        Return True
    Catch e As Exception
        Return False
    End Try
End Function
You can write similar functions for other data types of course.
Marco Bellinaso
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date