DateValue (dates) Purpose Returns a date value given a string argument. Syntax DateValue (StringExpression) StringExpression Any string expression that represents a valid date. If an invalid string has been specified, the system will display an error. Example Sub Main()         Dim mydatestr As String         Dim mybirthday As Date         mydatestr = "7/9/71"         mybirthday = DateValue (mydatestr)                 Print "My birthday is:", mybirthday End Sub