1) Aprite VB e mettete Windows Form
2) Nella form inserire : 5 button, 1 textbox, 1 web browser, una statusstrip.
Poi,rinominate i 5 bottoni con : Vai, Stop, Indietro, Home e Avanti.
Finito questo, andate in basso e dalla statusstrip aggiungete una Progressbar, andate sul WebBrowser e cliccare, poi in Propietā cercare URL: e scrivere l'url della pagina iniziale che volete (per esempio www.google.it ).
Ora passiamo ai codici.
Cliccate 2 volte sul bottone Vaie mettere :
WebBrowser1.Navigate(TextBox1.Text)
Cliccate 2 volte sul bottone Stop e mettere :
WebBrowser1.stop()
Cliccate 2 volte sul bottone Home e mettere :
WebBrowser1.GoHome()
Cliccate 2 volte sul bottone Indietro e mettere :
WebBrowser1.GoBack
E con i bottoni abbiamo finito. Ora passiamo al codice della ProgressBar.
Cliccate 2 volte sulla ProgressBar e mettere :
Private Sub WebBrowser1_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 ToolStripProgressBar1.Value = (CurProg / MaxProg) * 100
--------------------------------------------------------------------------------------
Guida finita =)
Guida creata da Leggendario 4
