R
Rob
Hello
I've read the responses to KitCaz question and I used what was suggested
below.
It works great, however, I have a followup question.
Is there a way I can make the form/label to flash while macros are running?
At this point, the form pop-ups but doesn't flash while my macros are
running. It only starts to flash when the macro is done. I even added the
"docmd.RepaintObject" in my codes.
As always, you guys are doing a wonderful job in helping people out with
their Access problems.
Cheers!
Rob
Rick has mentioned the problems with flashing labels. I suggest that you do
not use complementary colors (like red/green) and do not do anything faster
than 1/2 second. The following code starts in 1 second and flashes a label 5
times for a 1/2 second duration flash off and a 2 and 1/2 second duration
on. Set the TimerInterval property to 1000.
Private Sub Form_Timer()
Dim i As Integer
For i = 1 To 5
If Me.lblWarning.Visible = True Then
Me.lblWarning.Visible = False
Me.TimerInterval = 500
Else
Me.lblWarning.Visible = True
Me.TimerInterval = 2500
End If
Next i
End Sub
--
Arvin Meyer, MCP, MVP
Microsoft Access
Free Access Downloads
http://www.datastrat.com
http://www.mvps.org/access
Was this post helpful to
I've read the responses to KitCaz question and I used what was suggested
below.
It works great, however, I have a followup question.
Is there a way I can make the form/label to flash while macros are running?
At this point, the form pop-ups but doesn't flash while my macros are
running. It only starts to flash when the macro is done. I even added the
"docmd.RepaintObject" in my codes.
As always, you guys are doing a wonderful job in helping people out with
their Access problems.
Cheers!
Rob
effect.KitCaz said:How can I create a flashing / blinking label? I thought there might be a
simple property somewhere / somehow to do this, but I can't find anything.
Is my only recourse to set a form timer event and change the color with a
very short window? Seems like a lot to go through for such a simple
Rick has mentioned the problems with flashing labels. I suggest that you do
not use complementary colors (like red/green) and do not do anything faster
than 1/2 second. The following code starts in 1 second and flashes a label 5
times for a 1/2 second duration flash off and a 2 and 1/2 second duration
on. Set the TimerInterval property to 1000.
Private Sub Form_Timer()
Dim i As Integer
For i = 1 To 5
If Me.lblWarning.Visible = True Then
Me.lblWarning.Visible = False
Me.TimerInterval = 500
Else
Me.lblWarning.Visible = True
Me.TimerInterval = 2500
End If
Next i
End Sub
--
Arvin Meyer, MCP, MVP
Microsoft Access
Free Access Downloads
http://www.datastrat.com
http://www.mvps.org/access
Was this post helpful to