• Home
 · 
• Graphics
 · 
• This snip it allows you to create your own scrolling marquee using a label control, a timer, a modu

This snip it allows you to create your own scrolling marquee using a label control, a timer, a modu

This snip it allows you to create your own scrolling marquee using a label control, a timer, a module level or global string, a static integer

API Declarations


Static iStart As Integer 'timer declarations
Dim iLength As Integer 'timer declarations




Rate This snip it allows you to create your own scrolling marquee using a label control, a timer, a modu

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

sMarquee = "Whaleman -n- Jaxon SoftWare"

'place this code in a timer control.
iLength = Len(sMarquee)
If iStart = 0 Then iStart = 1
lblMarquee.Caption = Mid$(sMarquee, iStart, iLength) & "   " & Left$(sMarquee, iStart)
iStart = iStart + 1
If iStart >= iLength Then iStart = 0