La référence d'objet n'est pas définie à une instance d'un objet

Résolu/Fermé
mpsz Messages postés 20 Date d'inscription vendredi 21 décembre 2018 Statut Membre Dernière intervention 2 janvier 2021 - 18 janv. 2020 à 17:58
mpsz Messages postés 20 Date d'inscription vendredi 21 décembre 2018 Statut Membre Dernière intervention 2 janvier 2021 - 23 avril 2020 à 18:55
Bonjour, je crée un navigateur web (avec onglets) en VB.net mais c'est là le problème...
Quand je clique sur Nouvel onglet, ça met : La référence d'objet n'est pas définie à une instance d'un objet.
Code :

Dim navi As New WebBrowser

Me.TabControl1.TabPages.Add("TabPage1", "Onglet")

Me.TabControl1.TabPages("Onglet").Controls.Add(navi)

3 réponses

jordane45 Messages postés 38144 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 21 avril 2024 4 650
Modifié le 18 janv. 2020 à 18:14
Bonjour,

Alors déjà.. non... tu ne créés pas de navigateur web...
Tu ne fais qu'utiliser le composant "webbrowser" fourni par .NET et qui se sert du moteur d'internet explorer (ou version plus récente éventuellement...)

Ensuite, tu as oublié d'instancier l'objet TabPages non ?
Un truc du genre :
Dim TabControl1 As New TabControl 
Dim tabPage As New TabPage(url) 
tabPage.Controls.Add(navi)


Sinon tu peux regarder le code fourni ici qui devrait t'aider
https://social.msdn.microsoft.com/Forums/sqlserver/en-US/6f3d0f01-9bcb-40fa-b24e-405c519e4c7d/how-to-make-a-tabbed-webbrowser?forum=vbgeneral






0
mpsz Messages postés 20 Date d'inscription vendredi 21 décembre 2018 Statut Membre Dernière intervention 2 janvier 2021
20 janv. 2020 à 18:59
C'est pas très clair... Je vais trouver une solution
0
yg_be Messages postés 22720 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024 1 476
Modifié le 20 janv. 2020 à 19:57
bonjour, à quelle ligne se rapporte le message d'erreur?

moi j’essaierais plutôt:
Dim navi As New WebBrowser
Me.TabControl1.TabPages.Add("cle_unique", "nom_visible")
Me.TabControl1.TabPages("cle_unique").Controls.Add(navi)
0
mpsz Messages postés 20 Date d'inscription vendredi 21 décembre 2018 Statut Membre Dernière intervention 2 janvier 2021
22 janv. 2020 à 18:28
le troisième
0
yg_be Messages postés 22720 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024 1 476 > mpsz Messages postés 20 Date d'inscription vendredi 21 décembre 2018 Statut Membre Dernière intervention 2 janvier 2021
Modifié le 22 janv. 2020 à 19:09
as-tu essayé ma suggestion?

pour tester, tu peux aussi modifier
Me.TabControl1.TabPages("Onglet").Controls.Add(navi)

en et faire:
dim page as TabPage
page = Me.TabControl1.TabPages("Onglet")
page.Controls.Add(navi)

et ensuite voir à quelle ligne se produit l'erreur.
0
mpsz Messages postés 20 Date d'inscription vendredi 21 décembre 2018 Statut Membre Dernière intervention 2 janvier 2021 > yg_be Messages postés 22720 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 23 avril 2024
23 janv. 2020 à 20:39
Oh merci ça marche ton truc ;)
0
mpsz Messages postés 20 Date d'inscription vendredi 21 décembre 2018 Statut Membre Dernière intervention 2 janvier 2021
23 avril 2020 à 18:55
J'ai maintenant trouvé :

Dim page As New TabPage
Dim navi As New WebBrowser
navi.Dock = DockStyle.Fill
page.Controls.Add(navi)
TabControl1.Controls.Add(page)
0