Add Delay to Loop

[Jonno]

Hi

Can anyone tell me the best way to add a short time delay to a loop - When a form opens I am trying to create a gradual increment in tone (for aesthetic purposes) using:

Dim counter As Variant

counter = 0
While counter < 255
counter = counter + 1
Me.Detail.BackColor = RGB(counter, counter, counter)


Wend

how can I "time" this function?

 

[WayneRyan]

Jonno,

Search this forum for info on using the Timer Event.

Wayne

 

[IMO]

Will this help?

IMO

 

[Jonno]

Imo - have you got that in 97 format?

 

[IMO]

Here you are

IMO

 

[Jonno]

Thanks very much for that - gives me something to work with.