• Home
 · 
• Miscellaneous
 · 
• A simple loading bar

A simple loading bar

A simple loading bar

API Declarations



just
***Create a label named label1 and 20 timers named timer1....timer20**



Rate A simple loading bar

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Timer1.Enabled = False
Label1.Caption = "||           1"
Timer2.Enabled = True
End Sub

Private Sub Timer10_Timer()
Timer10.Enabled = False
Label1.Caption = "|||||||||||10"
Timer11.Enabled = True
End Sub

Private Sub Timer11_Timer()
Timer11.Enabled = False
Label1.Caption = "|||||||||||11|"
Timer12.Enabled = True
End Sub

Private Sub Timer12_Timer()
Timer12.Enabled = False
Label1.Caption = "|||||||||||12||"
Timer13.Enabled = True
End Sub

Private Sub Timer13_Timer()
Timer13.Enabled = False
Label1.Caption = "|||||||||||13|||"
Timer14.Enabled = True
End Sub

Private Sub Timer14_Timer()
Timer14.Enabled = False
Label1.Caption = "|||||||||||14||||"
Timer15.Enabled = True
End Sub

Private Sub Timer15_Timer()
Timer15.Enabled = False
Label1.Caption = "|||||||||||15|||||"
Timer16.Enabled = True
End Sub

Private Sub Timer16_Timer()
Timer16.Enabled = False
Label1.Caption = "|||||||||||16||||||"
Timer17.Enabled = True
End Sub

Private Sub Timer17_Timer()
Timer17.Enabled = False
Label1.Caption = "|||||||||||17|||||||"
Timer18.Enabled = True
End Sub

Private Sub Timer18_Timer()
Timer18.Enabled = False
Label1.Caption = "|||||||||||18||||||||"

Timer19.Enabled = True
End Sub

Private Sub Timer19_Timer()
Timer19.Enabled = False
Label1.Caption = "|||||||||||19|||||||||"
Timer20.Enabled = True
End Sub

Private Sub Timer2_Timer()
Timer2.Enabled = False
Label1.Caption = "|||          2"
Timer3.Enabled = True
End Sub

Private Sub Timer20_Timer()
Timer20.Enabled = False
Label1.Caption = "|||||||||||20||||||||||"
Timer1.Enabled = True
End Sub

Private Sub Timer3_Timer()
Timer3.Enabled = False
Label1.Caption = "||||         3"
Timer4.Enabled = True
End Sub

Private Sub Timer4_Timer()
Timer4.Enabled = False
Label1.Caption = "|||||        4"
Timer5.Enabled = True

End Sub

Private Sub Timer5_Timer()
Timer5.Enabled = False
Label1.Caption = "||||||       5"
Timer6.Enabled = True
End Sub

Private Sub Timer6_Timer()
Timer6.Enabled = False
Label1.Caption = "|||||||      6"
Timer7.Enabled = True
End Sub

Private Sub Timer7_Timer()
Timer7.Enabled = False
Label1.Caption = "||||||||     7"
Timer8.Enabled = True
End Sub

Private Sub Timer8_Timer()
Timer8.Enabled = False
Label1.Caption = "|||||||||    8"
Timer9.Enabled = True
End Sub

Private Sub Timer9_Timer()
Timer9.Enabled = False
Label1.Caption = "||||||||||   9"
Timer10.Enabled = True
End Sub