Time() and adding an hour in front or behind

[Ruegen]

I have an unbound text box on a form



The form timer interval is 1000

the form property on timer has this in vba

[txtTime] = Time()

and it refreshes nicely.

How do I get it to move one hour forward or behind?

I was thinking something like Time("h", 3,) but I get errors...

[sdel_nevo]

Hi Ruegen

try this

=DateAdd("h", 3,[txtTime]) Steve

[Ruegen]

Hi Ruegen

try this

=DateAdd("h", 3,[txtTime]) Steve

It didn't work however..

I added a second unbound textbox and gave it that and it works on the second one obviously......still...

My problem is I want several clocks depending on the state the record is so many if statements are needed in the vba..

[June7]

This what you want:

[txtTime] = DateAdd("h",3,Time())

[Ruegen]

Works thanks