To roll the strings easily !
To roll the strings easily !
Rate To roll the strings easily !
(1(1 Vote))
Private Sub Form_Load()
title = String(30, " ") & " Place the message here..."
End Sub
Private Sub Timer1_Timer()
title = Mid(title, 2) & Left(title, 1)
Label1.Caption = title
End Sub
To roll the strings easily ! Comments
No comments yet — be the first to post one!
Post a Comment