[VB.NET] Progress Bar & Web Browser a schede

[nico95]

Ciao a tutti sto realizzando un browser a schede e non risco a creare la progress bar...
ho cercato in rete e ho trovato un codice ma se lo riadatto alle mie esigenze mi da questo errore...

La clausola Handles richiede una variabile WithEvents definita nel tipo che la contiene o in uno dei suoi tipi di base.

vi allego il codice...

Dim WB As String = ("CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser)")
Private Sub WB_ProgressChanged(ByVal sender As Object, ByVal e As System.Windows.Forms.WebBrowserProgressChangedEventArgs) Handles WebBrowser1.ProgressChanged       
Dim CurProg As Single       
Dim MaxProg As Single       
CurProg = e.CurrentProgress       
MaxProg = e.MaximumProgress       
ProgressBar1.Value = (CurProg / MaxProg) * 100 

come avete potuto capire questo è il codice che va a richiamare il web browser

CType(TabControl1.SelectedTab.Controls.Item(0), WebBrowser) 

sperando in vostro aiuto vi ringrazio anticipatamente