Now function
Now
Returns a date that represents the current date and time according to the setting of the computer’s system date and time.
The Now function returns a Variant data type containing a date and time that are stored internally as a double. The number is a date and time from January 1, 100 through December 31, 9999, where January 1, 1900 is 2. Numbers to the left of the decimal point represent the date and numbers to the right represent the time.
Example
Sub Main
   Dim Today
   Today = Now 
End Sub