by cockrosoft corporation (3 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: Visual Basic 3.0
Difficulty: Beginner
Date Added: Wed 3rd February 2021
Rating: 
(4 Votes)
Making Animated Gradien Label.
Changing the background of a label.
VBcoders'Add 1 labelbox and timer to your form
'
'Name the labelbox as Label1
'
'Name the timer as Timer1
'
'Insert the following code to your form:
Private Sub Timer1_Timer()
Static A
A = A + 10: If A > 510 then A = 0
'To change the effect, put other numbers
'insted of the 0 below.
'
'You can also replace places betwwen
'the 'Abs '(A-256))' and one of the zeros
'below.
'To decrease the pace of the animation,
'increase the timer interval property.
Label1.BackColor = RGB(Abs(A - 256),0,0)
End Sub