Now (dates) Purpose Returns a date value containing the current time and date from the server's system clock. Syntax Now Example Sub Main()         Dim d As date         d = Now         Print "The current time and date is: ", d End Sub