How do I add a basic clock?

[Steven547]

I can't find my code anywhere that had this, but, I'm trying to remember how to add a running clock on my access form. I did it before where it basically was the date and time (hh:mm:ss). I remember having to set something in the properties to 1000....anyone have any suggestions?

Thanks.

 

[Ed2020]

I think what you did was to create a textbox on the form and then set the form's event timer interval to 1000 milliseconds. The form's timer event procedure will then update the textbox to the current time. Something like this:

Private Sub Form_Timer()
    Me.txtClock.Value=format(now(),"hh:nn:ss")
End Sub

Ed Metcalfe.

Please do not feed the trolls.....

 

[Steven547]

Yes..that was exactly what I did! Thank you! Been a little rusty lately.

 

[Steven547]

Ok..one more thing....what do I do again to get it to display in 12 hr format. So instead of 15:00 it displays 3pm?

Thanks again.

 

[Remou]

Add am/pm to the format:

format(now(),"hh:nn:ssam/pm")

 

[Steven547]

Thank you very much!

 

[Ed2020]

format(now(),"hh:nn:ss AM/PM")

Ed Metcalfe.

Please do not feed the trolls.....

 

[Ed2020]

lol. Damn Remou, you're fast.

Ed Metcalfe.

Please do not feed the trolls.....