[RESOLVED] Progress bar at 100%

[chunk]

Private Sub Form_Load()
Frame1.Visible = False
Timer1.Interval = 1
prbDetecting.Value = 0
End Sub

Private Sub Timer1_Timer()
prbDetecting.Value = prbDetecting + 5
If prbDetecting.Value = 100 Then
    Frame1.Visible = True
    Timer1.Enabled = False
End If

End Sub