Can anyone please help me by giving me some help on how do i scroll text on the title bar of my MDI form.
thanks in advance
Aindril De
Printable View
Can anyone please help me by giving me some help on how do i scroll text on the title bar of my MDI form.
thanks in advance
Aindril De
private Sub Form_Load()
Timer1.Interval = 200
me.Caption = "Why in the world would you want to distract your users like this? "
End Sub
private Sub Timer1_Timer()
Dim aStr as string
aStr = me.Caption
aStr = mid$(aStr, 2) & Left$(aStr, 1)
me.Caption = aStr
End Sub