Ladefortschritt im WebBrowser-Control Dieser Tipp zeigt, wie man den Ladefortschritt beim Laden einer Webseite im WebBrowser-Control im ProgressBar-Control anzeigen kann.
Autor:   Dieter Otter	Bewertung:     [ Jetzt bewerten ]	Views:  6.435
www.tools4vb.de	System:  Win9x, WinNT, Win2000, WinXP, Vista	Beispielprojekt auf CD

Geben Sie hier Ihre persönliche Bewertung ab! Anzahl Bewertungen bisher: 26 Bewertung insgesamt: gut Durchschnittliche Bewertung: 3.6 von 5 Sternen

sehr gut     gut     nützlich     mittelmäßig     mangelhaft

Heute zeigen wir Ihnen, wie man den Ladevorgang einer Webseite im WebBrowser-Control als Fortschrittsbalken anzeigen kann. Erstellen Sie ein neues Projekt und platzieren das WebBrowser-Control, sowie einen CommandButton und ein ProgressBar-Control auf die Form.

Beim Klick auf den CommandButton soll eine bestimmte Seite im Browser-Control angezeigt werden:

Private Sub Command1_Click()
  ' Webseite laden
  WebBrowser1.Navigate "http://www.vbarchiv.net"
End Sub

Während das Ladens der Seite wird vom WebBrowser-Control das ProgressChange-Ereignis ausgelöst. Hier lässt sich der Fortschritt dann wie folgt im ProgressBar-Control anzeigen:

Private Sub WebBrowser1_ProgressChange(ByVal Progress As Long, _
  ByVal ProgressMax As Long)
 
  ' Fortschrittsanzeige
  With ProgressBar1
    If ProgressMax < .Value Then .Value = 0
    If ProgressMax > 0 Then
      .Max = ProgressMax
      If Progress > 0 And Progress <= .Max Then
        .Value = Progress
      End If
    End If
  End With
End Sub