Marque scroll text in a text box very easily
Marque scroll text in a text box very easily
Rate Marque scroll text in a text box very easily
(1(1 Vote))
'Credits = text to be scrolled
'text1 is the recieving control
Dim i As Integer
i = Len(Text1.Text) - 1
Text1.Text = Right$(Text1.Text, i)
If Text1.Text = "" Then Text1.Text = Credits End If
Marque scroll text in a text box very easily Comments
No comments yet — be the first to post one!
Post a Comment