by Muhammad Wasif (3 Submissions)
Category: Graphics
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 12th September 2002
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
How To Make Marque in VB6.0 Using Timer.
API Declarations
VBcoders
b = 0
End Sub
Private Sub Timer1_Timer()
If Label1.Left <= Form1.Width - 2250 And b = 0 Then
Label1.Left = Label1.Left + 100
If Label1.Left >= 4520 Then b = 1
ElseIf Label1.Left >= 1 And b = 1 Then
Label1.Left = Label1.Left - 100
If Label1.Left <= 1 Then
b = 0
End If
End If
'Remember I have adjust the Label1.left & form1.width Property To get a good Result.
'You also have to set these.
'You also can make reverse of it.
'you can also use image in it.Use image height & width Property.
End Sub