Scrolling text (no depedencies)

by Baldho (7 Submissions)
Category: String Manipulation
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sat 5^th February 2000
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

API Declarations
'Place cancld = 1 in a cancel button to stop the scroll effect

Rate Scrolling text (no depedencies)




cancld = 0

Do
  u = Label1.Caption
  Y = Mid$(u, 1, 1)
  Label1.Caption = Mid$(Label1.Caption, 2, Len(Label1.Caption)) & Y
  For v = 1 To 3000
    DoEvents
  Next v
  Form1.Refresh
Loop Until cancld = 1

Download this snippet Add to My Saved Code

Scrolling text (no depedencies) Comments

No comments have been posted about Scrolling text (no depedencies). Why not be the first to post a comment about Scrolling text (no depedencies).

Scrolling text (no depedencies)

Scrolling text (no depedencies) Comments

Post your comment

Difficulty