Problème navigateur web en vb

Bonjour,

Je travail sur un projet de navigateur en web en VB.NET, je sais que c'est un langage basic (HAHA merci pour le jeux de mots :P), bref qui est peu puissant mais je tente mon coups malgré tout.

Je m'explique, le navigateur fonctionne parfaitement. Je voudrai savoir comment faire une progress barre lors du chargement d'une page web.

J'ai pensé à ce système :

    
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
        If WebControl1.IsLoading Then
            ProgressBar1.Value = 50
        Else
            ProgressBar1.Value = 100
        End If
        If ProgressBar1.Value = 100 Then
            ProgressBar1.Visible = False
        Else
            ProgressBar1.Visible = True
        End If
    End Sub

La barre se lance mais reste bloqué à 50 et ne disparaît jamais, y aurai-t-il un autre moyen de faire cette action ?

Voici un screen :

http://img15.hostingpics.net/pics/517303problemwebvbnet.jpg

Merci d'avance ! ;)