Getting Objects to appear

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hi, is it possible to somehow animate or at least the delay the appearance of
certain labels and command buttons on a form.

Basically what i have is a front screen (which contains a working clock,
using the time interval), and i'd like if possible that say 5 seconds after
the form in opened the several other labels, text boxes, etc.. gradually
appear and then remain.

Is this possible, and is it over complicated by having a clock already using
the timer function.

Thanks in advance.
 
sdg8481 said:
Hi, is it possible to somehow animate or at least the delay the appearance of
certain labels and command buttons on a form.

Basically what i have is a front screen (which contains a working clock,
using the time interval), and i'd like if possible that say 5 seconds after
the form in opened the several other labels, text boxes, etc.. gradually
appear and then remain.

Is this possible, and is it over complicated by having a clock already using
the timer function.

Thanks in advance.

If by "gradually" you mean they fade in, then I don't know how to do that other
than by a series of color changes that would be a bit complicated. If you mean
first one object appears and then another that is much easier.

Just and a long integer variable at the top of your form's code module and have
the timer event increase its value by one with each pass. Then you can simply
test for certain number values where you want things to happen.
 
Yes this is exactly what i want to do, but unfortunately i don't know how to
create a long integer variable , nor how to set the timer to increase its
value by one with each pass. Sorry if i'm being dumb here
 
sdg8481 said:
Yes this is exactly what i want to do, but unfortunately i don't know
how to create a long integer variable , nor how to set the timer to
increase its value by one with each pass. Sorry if i'm being dumb
here

"Rick Brandt" wrote:

Ok at eht very top of the form's module underneath Option Explicit and Option
Compare Database put...

Dim LoopCount as Long

Then in your existing Timer code...

LoopCount = LoopCount + 1

Select Case LoopCount
Case x
Me.TextBox.Visible = True
Case y
Me.SomeOtherTextBox.Visible = True
Case z
(you get the idea)
End Select

It will take some trial and error to determine what numbers should be
substituted for x, y, and z. You might also have to change your TimerInterval
value to achieve the desired reults.
 
Back
Top