PBar help

[308holes]

I have a progressbar in my project and i want a form to show after the progressbar get %100 here is my code help please

Option Explicit
Private Sub Form_Load()
    Load frmMain
    lblVersion.Caption = "Version " & App.Major & "." & App.Minor & "." & App.Revision
End Sub
 
Private Sub Timer1_Timer()
PBar1.Value = PBar1.Value + 2
End Sub