There is, and I don't recommend doing it as it does use up computer resources while doing it, but if you still insist -
1. Go to the Form's properties dialog and in the TimerInterval put 1000 (1000 is milliseconds, so 1000 milliseconds is 1 second)
2. and then select the dropdown in the On Timer event and select Event Procedure, then click the elipsis (...) that appears next to it. That should open the code window.
3. If you want a text box to display it, type in
Me.YourTextBoxName = Now
Or, if you want it on the form's caption set it to
Me.Caption = Now