Loading bar bij een web browser

[winmac]

Hallo

ik ben op zoek naar de code om een loading bar te laten berken bij een web browser.
Hij staat wel in een status script bar, anders zou ik de code al heben, ik moet wel snel heben want maandag moet ik klaar zijn met het programma.

 

[old Hippy]

Even google

Private Sub WebBrowser1_ProgressChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged
        ProgressBar1.Maximum = e.MaximumProgress
        ProgressBar1.Value = e.CurrentProgress
    End Sub

 

[winmac]

ik krijg een error:

De waarde van 1017000 is niet geldig voor Value. Value moet tussen 'minimum' en 'maximum' liggen.

 

[old Hippy]

waar heb je de code geplaatst???

 

[winmac]

gewoon: dubbel klik op iets, ctrl+a, backspace en dan ctrl+v met die code die jij mij gegeven hat. gewoon waar hij hoort.
het zag er zo uit

Public Class online

    Private Sub WebBrowser1_ProgressChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged
        ToolStripProgressBar1.Maximum = e.MaximumProgress
        ToolStripProgressBar1.Value = e.CurrentProgress
    End Sub
End Class

 

[old Hippy]

Probeer dit eens

 Private Sub WebBrowser1_DocumentCompleted(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
        With ProgressBar1
            .Value = 0
        End With
    End Sub

    Private Sub WebBrowser1_Navigating(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserNavigatingEventArgs) Handles WebBrowser1.Navigating
        With ProgressBar1
            .Minimum = 0
            .Maximum = 50
            .Step = 5
        End With

        For index As Integer = 0 To 50 Step 5
            ProgressBar1.Value = index
            System.Threading.Thread.Sleep(10)
        Next

    End Sub

Wel de naam van je webbrowser en progressbar aanpassen.

 

[winmac]

deze werkt, heel erg benankt voor u hulp.