Auto Vertical Text Scroll

  • Thread starter Thread starter Eric
  • Start date Start date
E

Eric

Hi,

I was wondering if there is a way to automatically make
text scroll vertically so that it looks like rolling
credits from a movie?

Thanks in advance for your help.

Eric
 
Eric said:
I was wondering if there is a way to automatically make
text scroll vertically so that it looks like rolling
credits from a movie?
Click to expand...


That sounds a little hokey, but you can use the Mid function
in a time delayed loop to strip off the front of the string.

I would need to know where the string you want to scroll is
stored and how the lines in it are delimited to be more
specific, but if the string is stored in a variable and each
line is 20 characters, then something like this might get
you started:

For K = 0 to Len(scrollstr) \ 20
Me.sometextbox = Mid(scrollstr, 20 * K)
For D = 1 to 100
DoEvents
Next D
Next K
 
Back
Top