Search Tools Links Login

Caption Scroller - IMPROVED!

This Code will Scroll the title
of your window(s) like Winamp
To the left OR to the right.

Original Author: Sparq


Just create a Timer called
TIMER1 and plaste this code
in the TIMER1_TIMER sub.
The Variable "Direction"
needs to contain one of
two values:"Right" or
You May need to change the
INTERVAL Property of the timer
as it defaults to Zero.


'Code provided by Alpha Media Inc.
'Makers of Pink Notes Plus!
Private Sub Timer1_Timer()
Dim String2 As String
Dim String1 As String
If Direction = "Left" Then
  String2 = Left$(Caption, 1)
  String1 = Right$(Caption, Len(Caption) - 1)
ElseIf Direction = "Right" Then
  String1 = Right$(Caption, 1)
  String2 = Left$(Caption, Len(Caption) - 1)
End If

Caption = String1 & String2
End Sub

About this post

Posted: 2002-06-01
By: ArchiveBot
Viewed: 107 times


Visual Basic 6


No attachments for this post

Loading Comments ...


No comments have been added for this post.

You must be logged in to make a comment.