Scrolls text in a forms title bar

by John W (7 Submissions)
Category: Custom Controls/Forms/Menus
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Fri 25^th January 2002
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

Rate Scrolls text in a forms title bar




Private Sub Form_Load()
Dim SpaceNums As Integer

Timer1.Interval = 50

SpaceNums = Int(Me.Width / 50)
Me.Caption = "HELLO" & Space(SpaceNums) & "|"

Timer1.Enabled = True

End Sub

Private Sub Timer1_Timer()

Me.Caption = Right(Me.Caption, Len(Me.Caption) - 1) & Left(Me.Caption, 1)

End Sub

Download this snippet Add to My Saved Code

Scrolls text in a forms title bar Comments

No comments have been posted about Scrolls text in a forms title bar. Why not be the first to post a comment about Scrolls text in a forms title bar.

Scrolls text in a forms title bar

Scrolls text in a forms title bar Comments

Post your comment

Difficulty