real time function in a form

[bigdazzer]

hi all

i am currently using this =DateAdd("n",-30,Now()) to display time zones on a map of australia this returns the current time when the form is opened however the form can only change the time when the form is refreshed. What i am trying to achieve is a time function in real time that shows hours minutes and seconds which i will place on my master form. Why i hear you ask because im to lazy to look at the clock in the system tray and i want to know if it can be done? :D

 

[Rocky E]

Use the forms On Timer Event to refresh

Hi,

Use your forms On Timer Event to refresh you clock display. Remember this is going to eat CPU cycles each and every time it fires. You have been warned!

 

[Tanis]

Try this function.

Function ChangeCaption()

Dim i As Integer

For i = 0 To Forms.Count - 1

Forms(i).Caption = Format(Now, "dddd,mmm d yyyy,hh:mm:ss AMPM")

Next i

End Function

Then call the function from the Timer event of the form.


David