И третий вариант - cx_Freeze
, который является кросс-платформенным.
Значение -1 означает "загрузка завершена", как описано в статье MSDN Library для этого свойства. Таким образом:
Private Sub WebBrowser1_ProgressChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged
If e.CurrentProgress = -1 Then
ProgressBar1.Maximum = 100
ProgressBar1.Value = 100
Else
ProgressBar1.Maximum = e.MaximumProgress
ProgressBar1.Value = e.CurrentProgress
End If
End Sub
Или вы можете захотеть использовать -1, чтобы скрыть индикатор выполнения.