Form üzerine lblClock adında bir etiket, cmdClockStart ve cmdClockEnd adında iki adet komut düğmesi ekleyin.
formun TimerInterval (süreölçer aralığı) özelliğini 1000 yapın ve aşağıdaki kodu formun modülüne kopyalayın.

'********************************
Private Sub Form_Timer()
    Me!lblClock.Caption = Format(Now, "dddd, mmm d yyyy, hh:mm:ss AMPM")
End Sub

Private Sub cmdClockStart_Click()
    Me.TimerInterval = 1000
End Sub

Private Sub cmdClockEnd_Click()
    Me.TimerInterval = 0
End Sub
'********************************