Bonjour,

dans mon apprentissage du VB.NET, j'ai un problème avec les tabcontrol :

je fais un système d'onglet dynamiques de ce style :

Private compteur AsInteger = 0

PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim onglet AsNew System.Windows.Forms.TabPage
TabControl1.Controls.Add(onglet)
compteur = compteur + 1
onglet.Text = "Onglet" & compteur
TabControl1.SelectedIndex = compteur
AddHandler TabControl1.TabIndexChanged, AddressOf TabControl1_TabIndexChanged
EndSub

PrivateSub TabControl1_TabIndexChanged(ByVal sender AsObject, ByVal e As System.EventArgs) Handles TabControl1.TabIndexChanged

MsgBox("ok")

EndSub

Quand je cliques sur Button1, le nouvel onglet s'ouvre bien, le nom est ok et il passe bien en premier plan par rapport à l'onglet précédent mais je ne passe pas par TabControl1_TabIndexChanged. Quel serait l'évènement qui me permettrait de passer par TabControl1_TabIndexChanged à l'ouverture de l'onglet?

Merci d'avance,

Fred

pardon, je me suis mal exprimé, par quel évènement puis-je passer pour continuer une fois l'onglet ouvert

SAlut,

Utilises SelectedIndexChanged

Sinon ajoutes des pages plutot comme cela: TabControl1.TabPages.Add(onglet)
@+
youpi :)

Salut,
merci pour ta réponse. Avec SelectedIndexChanged, j'ai bien la msgbox qui apparait (cf code au dessus). Par contre, quand j'ouvre le 1er onglet, la msgbox apparait une fois, quand j'en ouvre un 2è, elle apparait fois et ainsi de suite.  Comment faire pour que la procédure TabControl1_SelectedIndexChanged ne s'exécute qu'une seule fois?

Comprend pas, désolé.
TabControl1_SelectedIndexChanged n'est executé que lorsque tabindex change, donc pas 2 fois

code
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim onglet As New System.Windows.Forms.TabPage

        compteur = compteur + 1
        onglet.Text = "Onglet" & compteur
        'TabControl1.SelectedIndex = compteur
        TabControl1.TabPages.Add(onglet)
    End Sub


    Private Sub TabControl1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TabControl1.SelectedIndexChanged
        MsgBox("ok")
    End Sub
tu n'as pas besoin defaire un addhandler... ton tabcontrol est déjà génré dans le designer comme friend with events....
@+
youpi :)

Salut, en fait, pour apprendre, j'aimerais me faire un navigateur avec un système d'onglet dynamique. J'ai donc pour chaque onglet un axwebbrowser. Pour gérer chaque axwebbrowser et comme je ne sais pas combien il y en aura, je pensais passer par un addhandler, d'après ce que j'ai pu lire, ça a l'air d'être la meilleure méthode. De plus, j'ai l'impression qu'on ne peut pas mettre de nom à un axwebbrowser.

Salut,

Pour ton Tab contronl tu n'as pas besoin de créer un handler parce que l'a déjà créer avec le designer de visual. en revanche si tu le créé dynamiquement il faudra effectivement que tu lui  ajoutes un handler. Par contre, pour tes webbrowser si tu les créés dynamiquement il faudra que tu créés leurs propres handlers pour que tu puisses catcher les évenements.

petite question, tu utilises bien visual 2005 ou 2008, pourquoi tu prend axwebbrowser? pourquoi tu prends pas le webbrowser fournit par le framework?
@+
youpi :)

salut,
j'utilise bien VS 2008.
Pour l'axwebbrowser, c'est tout simplement parce qu'en regardant quelques tutoriaux, j'ai vu que c'était le plus utilisé. Tu connaîtrais les avantages et inconvénients de chaque?

Salut,
écoute non je connais pas les différences mais webbrowser est fournit automatiquement donc mieux documenter et plus facile d'utilisation.
tu as réglé ton problème au faite?
@+
youpi :)

Salut,
je n'arrive pas à régler mon problème. J'ai modifié mon code de la façon suivante :

Private compteur As Integer = 0
Dim onglet As New System.Windows.Forms.TabPage
Dim Webpage As New System.Windows.Forms.WebBrowser

Private Sub Button1_Click( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
   TabControl1.TabPages.Add(onglet)
   compteur = compteur + 1
   onglet.Text = "Onglet" & compteur
   onglet.Name = onglet.Text
   onglet.Controls.Add(Webpage)
   Webpage.Name = "Webpage" & compteur
   TabControl1.SelectedIndex = compteur
   AddHandler TabControl1.SelectedIndexChanged, AddressOf Naviguer
End Sub

Private Sub Naviguer( ByVal sender As Object , ByVal evArgs As EventArgs)
   Webpage.Navigate( [ Lien ] )
End Sub

Quand je le lance, les onglets s'ouvrent bien mais la navigation ne se fait pas. De plus, quand je fais un debug pas à pas, il ne passe par Naviguer() qu'après le 2è clic sur Button1.
Quand tu me dis que je dois créer mes propres handlers, que veux tu dire par là?

Merci pour tout

Fred