hi all

How do I make a label blink in VB6? How about a picture box?

Thank you
Happy 2000
--
Always aim for integrity

Hi Luke,

use a timer and set the interval to 500 (ms or some value you want). In the
timer event enable the label if it is not enabled and vice versa. In order
to disable blinking disable the timer.

Private Sub Timer1_Timer()
  If Label1.Enabled Then
    Label1.Enabled = False
  Else
    Label1.Enabled = True
  End If
End Sub

Private Sub Command1_Click()
  If Timer1.Enabled Then
    Timer1.Enabled = False
  Else
    Timer1.Enabled = True
  End If
End Sub

Or simply change the color or visibility. You can do that with every control
you want.

regards,
- Jens -

Or you can use this one.

Private Sub Command1_Click()
    Timer1.Enabled = Not Timer1.Enabled
End Sub

Private Sub Timer1_Timer()
    lable1.Enabled = Not lable1.Enabled
End Sub

--
Gary A. Leers
The University of Georgia
Redding Building Room 217
Corp and Soil Sciences
Environmental physiology lab
1109 Experiment street
Griffin GA. 30224

Voice (770)-467-6001
Fax    (770)-229-3215

"No problems, only solutions"