• Home
 · 
• Custom Controls/Forms/Menus
 · 
• Simple code to build scrolling text application

Simple code to build scrolling text application

Simple code to build scrolling text application

API Declarations


note:
it uses two timers and it uses left property of the label to accomplish the
task.





Rate Simple code to build scrolling text application

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Label1.ForeColor = vbCyan

If Label1.Left < 10000 Then
Label1.Left = Label1.Left + 400
Else
Timer1.Enabled = False
Timer2.Enabled = True
End If

End Sub

Private Sub Timer2_Timer()
Label1.ForeColor = vbRed

If Label1.Left <> 0 Then
Label1.Left = Label1.Left - 400
Else
Timer2.Enabled = False
Timer1.Enabled = True
End If
End Sub