DateSerial (year, month,day)
Returns a variant (Date) corresponding to the year, month and day that were passed in. All three parameters for the DateSerial Function are required and must be valid.
Example:
Sub Main
Dim MDate
MDate = DateSerial(1959, 5, 29)
Print MDate
End Sub