VB 2010 Webbrowser - Progressbar Frage

[Blitz100]

Guten Tag!
Ich habe ein Problem und zwar wenn man das mit Webbrowser1_ProgressChanged (oder so) das mit der ToolstripProgressbar macht mit dem Code

ToolStripProgressbar1.Maximum = e.Maximum...
ToolStripProgessbar1.Value = e.CurrenProgress

(Halt der Code.. ich glaub die meisten wissen was gemeint ist.)

Bei mir kommt dann immer ein Fehler wenn ich eine Seite aufrufe...

Bitte helft mir... :S

[-AmA-]

ich seh mal nach...
Aber wir sollten schon die Fehlermeldung zu sehen kriegen....
Dan kann ich auch gleich sagen was falsch ist

Edit:

Geschrieben in C#, konvertiert in VB mit Reflector:

PHP Code:

    Private Sub webBrowser1_ProgressChanged(ByVal sender As Object, ByVal e As WebBrowserProgressChangedEventArgs)
        Me.toolStripProgressBar1.Maximum = Convert.ToInt32(e.MaximumProgress)
        Me.toolStripProgressBar1.Value = Convert.ToInt32(e.CurrentProgress)
    End Sub 


[Blitz100]

okay, danke schonmal ich kann es gleich erst testen, weil ich an psp bin

€Dit: Geht nicht :S ...

Fehler :

Der Wert -1 ist für Value ungültig. Value sollte zwischen 'minimum' und 'maximum' liegen.
Parametername: Value

Code:
Me.toolStripProgressBar1.Value = Convert.ToInt32(e.CurrentProgress)

[Yakiyo]

Ein bisschen suchen

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
      Me.ProgressBar1.Maximum = 0
      Me.ProgressBar1.Maximum = 100
  End Sub

  Private Sub WebBrowser1_ProgressChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged
      Me.ProgressBar1.Value = CType((e.CurrentProgress / e.MaximumProgress) * 100, Integer)
  End Sub

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

[Blitz100]

Me.ToolStripProgressBar1.Value = CType((e.CurrentProgress / e.MaximumProgress) * 100, Integer)

Dividieren durch 0 oder so??
Muss ich bei Interger was einsetzen, weil bin total neu
Kann zwar schon etwas aber nicht sowas :P

[Yakiyo]

[Blitz100]

Kann damit nichts anfangen?

[Yakiyo]

Hast du dir den Thread angeguckt?
Wenn ja, wüsstest du wie es geht o.ô
Ich werde den Code nicht erklären, weil alle immer nur Copy & Paste machen wollen, anstatt zu lernen :X

lg ~

[Kraizy​]

Ich versteh dein Problem nicht so ganz..friseur hat dir die Lösung doch schon mehrmals gezeigt. ProgressBar.Value = e.CurrentProgress das packste in das WebBrowser_ProgressChanged-Ereignis. ProgressBar.Minimium setzt du auf 0 und .Maximum auf 100..

[-AmA-]

Originally Posted by Fisticuff

Ich versteh dein Problem nicht so ganz..friseur hat dir die Lösung doch schon mehrmals gezeigt. ProgressBar.Value = e.CurrentProgress das packste in das WebBrowser_ProgressChanged-Ereignis. ProgressBar.Minimium setzt du auf 0 und .Maximum auf 100..

Lol Fail!
So hat ers aber nicht gezeigt xD
Sieh dir den Code nochmal an -.-

Und auf deine Frage:

Dividieren durch 0 oder so??
Muss ich bei Interger was einsetzen, weil bin total neu
Kann zwar schon etwas aber nicht sowas :P

Lass den Code so wie er ist... dort muss Integer stehen...
CType((e.CurrentProgress / e.MaximumProgress) * 100, Integer)
Und zwar weil CType als 2.ter Parameter der Datentyp der ausgegeben werden soll verlangt... Also Integer.

[Kraizy​]

Originally Posted by -AmA-

Lol Fail!
So hat ers aber nicht gezeigt xD
Sieh dir den Code nochmal an -.-

Ähm..ich hab mir den Code sehr wohl angeschaut..jedoch:

PHP Code:

Me.ProgressBar1.Value = CType((e.CurrentProgress / e.MaximumProgress) * 100, Integer) 


Wozu soll man da was teilen?? Da reicht einfach nur ProgressBar1.Value = e.CurrentProgress (evtl. an Option Strict anpassen) aus, da wird kein Fehler kommen -.-
Und:

PHP Code:

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


Das hier kann man schon gleich ganz weg lassen, denn die ProgressBar wird automatisch nach dem Laden der Seite zurückgesetzt..

Außerdem ergibt das hier nicht grade viel Sinn:

PHP Code:

Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Me.ProgressBar1.Maximum = 0
        Me.ProgressBar1.Maximum = 100
    End Sub 


Wozu 2x .Maximum? Standartmäßig ist die ProgressBar schon auf Minimum 0 und Maximum 100, also kann man das auch weglassen..

[Blitz100]

Wenn ich das so habe in VB 2010:

    Private Sub WebBrowser1_ProgressChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged

        Me.ToolStripProgressBar1.Value = CType((e.CurrentProgress / e.MaximumProgress) * 100, Integer)

Kommt IMMER OverFlowException wurde nicht von Benutzer Behandelt.

Blaa...

Dividieren Sie nicht durch 0!

[Kraizy​]

Was genau willst du denn machen? Den Fortschritt anzeigen wie viel eine Seite schon geladen wurde? Lösch mal deine ProgressBar und füge eine neue hinzu, als Standardeigenschagt müsste Minimum auf 0 und Maximum auf 100 sein. Nun gehst du ins WebBrowser_ProgressChanged und fügst das ein:
ProgressBar1.Value = e.CurrentProgress. Fertig! Da kommt kein Fehler...