• Home
 · 
• Miscellaneous
 · 
• Scrolling Title/Label Caption

Scrolling Title/Label Caption

Simple, 4 lines of code, timer function that will scroll the title of your form, or a label caption, or the caption of a button or whatever. scroll something. this is very simple, and i dont know if anythign else like it is posted, i dont look before i post. I just thought this was neat since i'm bored and at work...

Rate Scrolling Title/Label Caption

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

'Can be form.caption, text1.text, label.caption, button1.caption, whatever.
Private Sub Timer1_Timer()
Dim Length As Long
DoEvents
Length = Len(Form1.Caption) - 1
Form1.Caption = Right$(Form1.Caption, Length) & Left(Form1.Caption, 1)
End Sub