I have done this with moving GIF's, but have not tried this with text since my Clipper days...

1. create a form property to hold a number. initialize it at 1
2. Put a timer on the form with an interval of say 100
3. Each time the timer fires, add to the form property for the number and redraw the text
4. The text redraw is something like substr(cTheText,nTheformtimer,nHowWIde)

This is just a guess as I haven't played with it.

HTH