by BlueDemon (1 Submission)
Category: Custom Controls/Forms/Menus
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Sun 11th June 2006
Date Added: Mon 8th February 2021
Rating: 
(1 Votes)
This code makes form title to "appear" char by char from left to right. Great for application startup. Few lines of code. Ideal for beginners.
VBcoders
Dim Cont As Integer
Const Title = "Put your text here!"
Private Sub ScrollTitle_Timer()
Cont = Cont + 1
Me.Caption = Me.Caption & Mid(Title, Cont, 1)
If Cont = Len(Title) Then ScrollTitle.Enabled = False
End Sub
Private Sub Form_Load()
ScrollTitle.Interval = 20 'Scrolling Interval
ScrollTitle.Enabled = True
End Sub
No comments have been posted about This code makes form title to appear char by char from left to right. Great for application start. Why not be the first to post a comment about This code makes form title to appear char by char from left to right. Great for application start.