form_load
progressbar1.maximum=100
progressbar1.minimum=0
progressbar1.step=2
button1_click
timer1.Stop
button2_click
timer1.Stop
timer1._click
If(i=0)Then
If(progressbar1.value>=100)Then
i=1
Else
progressbar1.value=progressbar1.value+5
End If
Else If(i=1)Then
i=0
Else
progressbar1.value=progressbar1.value-5
End If
End If
KADİR SELEN