¿Qué quieres calcular el progreso de una página en concreto o todas las paginas a la vez?
Si te refieres a una es asi:
Código VB:
Ver originalPrivate Sub WebBrowser1_ProgressChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged
Me.ProgressBar1.Maximum = Convert.ToInt32(e.MaximumProgress)
Me.ProgressBar1.Value = Convert.ToInt32(e.CurrentProgress)
End Sub