Vb Code

Public Class MainWindow @@@@@@@@ OUATTARA G. ROMUALD @@@@@@@@ @@@@@@@@ WEBBROWSER @@@@@@@@ # component part GESTION DE LA FENETRE PRINCIPALE Chargement de la fenetre surreptitious Sub MainWindow_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load On demande à ce que le bouton go soit équivalent à la touche ENTREE Comme sa on peut naviguer en tapant juste ENTREE Me.AcceptButton = Me.Go_BT End Sub #End office #Region GESTION DU/DES WEBBROWSER DocumentComplete permet de savoir si le page a fini de courser Private Sub WebBrowser_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser.DocumentCompleted Si ladresse du WebBrowser nexiste pas encore dans la barre daddresse (AdresseURl_CB) Cela permet déviter de copier plusieurs fois la même adresse dans le ComboBox If Me.AdresseURL_CB.Items.IndexOf(Me.WebBrowser.Url.ToString) < 0 Then Alors on ajoute ladresse Me.AdresseUR L_CB.Items.Add(Me.WebBrowser.Url.ToString) End If Ensuite on donne le titre de la page à longlet Me.Onglets.SelectedTab.Text = Me.WebBrowser.DocumentTitle On donne aussi a la barre dadresse ladresse exacte de la page Me.AdresseURL_CB.Text = Me.WebBrowser.Url.ToString On desactive le bouton stop Me.Stop_BT.

Enabled = ludicrous Si on peut repartir a la page preceding(prenominal)e If Me.WebBrowser.CanGoBack Then On active le bouton precedent Me.Precedent_BT.Enabled = current Else Me.Precedent_BT.Enabled = False End If Si on peut repartir a la page siuvante If Me.WebBrowser.CanGoForward Then On active le bouton suivant Me.Suivant_BT.Enabled = True Else Me.Suivan! t_BT.Enabled = False End If End Sub NewWindow permet de savoir si une fenetre est en stop de creer Private Sub WebBrowser_NewWindow(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WebBrowser.NewWindow Dim elementActif As HtmlElement = WebBrowser.Document.ActiveElement On obtient lelement actif du...If you want to get a right essay, order it on our website: BestEssayCheap.com

If you want to get a full essay, visit our page: cheap essay