by Pedro (4 Submissions)
Category: String Manipulation
Compatability: Visual Basic 4.0 (32-bit)
Difficulty: Unknown Difficulty
Originally Published: Thu 14th February 2002
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Scroll Text with 1 line of code... 2 methods, each 1 line
API Declarations
'Stick one of the codes in the timer... or both, but that will make 2 letters
'scroll at a time.
lblScroll.Caption = Mid((Mid(lblScroll, Len(lblScroll), 1) & Mid(lblScroll, 2, Len(lblScroll)) & Mid(lblScroll, 1, 1)), 2, Len(lblScroll))
'Method 2 - I like this one better... more efficient
lblScroll.Caption = Mid(lblScroll, 2) & Left(lblScroll, 1)