Returns the system date as a Date type.
d = Date
d: Date expression
Dim MyDate As Date
MyDate = Date ' MyDate contains the current system date.
A comparison operation with Date is possible only when both sides are of data type Date. When necessary cast the left- or right side using a CDate.
Local datum$ = Format(Date, "dd/mm/yyyy")
Local datum% = CDate(datum$)
Debug.Show
Trace datum$
Trace datum%
Trace Date
Trace Date$(datum%)
Trace Date = datum%
Trace Date = CDate(datum%)
Trace Date = CDate(datum$)
{Created by Sjouke Hamstra; Last updated: 28/09/2014 by James Gaite}