Create a simple Scroll label for your App. ((Very simple))with 10 line of code

by Edgar` (1 Submission)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Fri 26^th September 2003
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

Rate Create a simple Scroll label for your App. ((Very simple))with 10 line of code



'also a Picturebox with a Label In it
'label autosize = true
'and that is all...
'If you the Master Of VB make any Chages plese
'Let me know cause i'm a Rookie
'I use the scroll label to send Device status to an Automation Program 
' that i'm working on for my house Heating/Cooling and Appliance's
'I don't know if i'm right but every code I write I try to do it in plane 
'english then converted in VB Language is that OK... 
'Edgar Santiago 
'------------------------------------------------------------------------
Private Sub Form_Load()
Label1.left = -Picture1.left - Label1.Width

End Sub

Private Sub Timer1_Timer()
On Error Resume Next
Static left  As Long
' to chage speed chage the 5 to 10 or what ever you eant
left = left + 1 * 5 "<-------- Speed
Label1.Move -Picture1.left + left
Label3.Caption = "Label Move Left = " & left
If Label1.left = Picture1.Width Then
'Label1.Width = Picture1.ScaleLeft
left = -Picture1.left - Label1.Width
Label1.Move left
End If

End Sub

Download this snippet Add to My Saved Code

Create a simple Scroll label for your App. ((Very simple))with 10 line of code Comments

No comments have been posted about Create a simple Scroll label for your App. ((Very simple))with 10 line of code. Why not be the first to post a comment about Create a simple Scroll label for your App. ((Very simple))with 10 line of code.

Create a simple Scroll label for your App. ((Very simple))with 10 line of code

Create a simple Scroll label for your App. ((Very simple))with 10 line of code Comments

Post your comment

Difficulty