by SAMAD (2 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Mon 15th September 2003
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Make Blink effect for your text.
'Put this code in the following events and Run the form.
Private Sub Form_Load()
label1.caption="Welcome to vb6"
label1.forecolor=qbcolor(0)
Timer1.interval=1000
End sub
Private Sub Timer1_Timer()
if label1.forecolor=qbcolor(0) then
label1.forecolor=qbcolor(10)
else
label1.forecolor=qbcolor(0)
endif
End sub