How to add running time on a form?

[Serkan]

I add current date and time on a form, but it only shows
the time that was accessed, time is not running. Is there
any way to insert running time on a form?

 

[losmac]

Use Timer object.

Set TimerInterval for the form = 1000 miliseconds

Private Sub Form_Timer()
Me.Text0.Value = Now()
End Sub