Place a label and a timer on a form , set the timers interval to about 250.
Enter the following code
Private Sub Timer1_Timer()
Label1.Caption = "Blinking label effect"
If Label1.Visible = True Then
Label1.Visible = False
Else
Label1.Visible = True
End If
End Sub
|