• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 271
  • Last Modified:

Stock Ticker in VB5

Hi, I need to create a 'stock ticker' type text box. For simplicity, let's say I have a set text string I want to scroll across the screen, like you can with that annoying HTML tag. I have gotten close, but I haven't quite been able to figure out how to do it. Can anybody help, please?
0
Mrusine
Asked:
Mrusine
1 Solution
 
MrusineAuthor Commented:
From Mrusine:

Sorry, I said Text Box when I mean Label - not sure if it makes a difference, but I wanted to clarify.
0
 
jjmartinCommented:
There is a a control called CoolTicker you can download from download.com.  This has the functionality you are looking for.
0
 
wfordCommented:
try this, its just a form with a timer, a label and a private sub

Private Sub Form_Load()
 Label1 = "This is a ticker tape ....."
 Timer1.Interval = 500
End Sub

Private Sub Timer1_Timer()
 Call fm_ticker
End Sub

Private Sub fm_ticker()
  Dim TmpStr As String
  Dim n as long

  TmpStr = Label1
  n = Len(TmpStr)
  TmpStr = Right$(TmpStr, n - 1) & Left$(TmpStr, 1)
  Label1 = TmpStr
End Sub
0

Featured Post

Concerto's Cloud Advisory Services

Want to avoid the missteps to gaining all the benefits of the cloud? Learn more about the different assessment options from our Cloud Advisory team.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now