Rendre Form1 invisible en VB 2010

Bonsoir à tous. J'ai besoin de votre aide.
Je suis sous VB 2010
J'ai crée la fenêtre principale Form1 où j'ai mis un bouton, le clic de ce dernier fait apparaître une 2ème fenêtre Form2.
Je veux qu'à l’apparition de Form2, le Form1 devient invisible.
Comment s'y prendre?
Merci

Bonjour,

Code:

---

1 2 3

Form1.Visible = False ' Me.Visible = False Dim f As Form2 = New Form2 f.Show()

---

Et à la fermeture de Form2 (dans form2) rendre form1 visible.

Code:

---

1 2 3

Private Sub form2_FormClosed(sender As System.Object, e As System.Windows.Forms.FormClosedEventArgs) Handles MyBase.FormClosed Form1.Visible = True End Sub

---

Mais cela lie les 2 fenêtres. Tu ne peux pas utiliser form2 avec une autre fenêtre.

_________________________________
On peut aussi ouvrir form2 en modal (bloquant pour form1 tant que la fenêtre form2 est ouverte)

Code:

---

1 2 3 4

Form1.Visible = False Dim f As Form2 = New Form2 f.ShowDialog() ' ouvre form2 et attend la fermeture de form2 avant de continuer Form1.Visible = True

---

Ainsi à la fermeture de form2 le code continu, et rend form1 de nouveau visible.

_________________________________
[Edit]
Afin de compléter un peu le premier cas de figure, pour rendre form2 indépendant, tu peux surcharger son constructeur pour qu'il reçoive une fenêtre en paramètre et rendre la fenêtre appelante visible sur la fermeture de form2.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Public Class Form2   Private _f As Form   Sub New(f As Form) InitializeComponent() _f = f End Sub   Private Sub form2_FormClosed(sender As System.Object, e As System.Windows.Forms.FormClosedEventArgs) Handles MyBase.FormClosed _f.Visible = True End Sub

---

tu pourrais même rendre form1 invisible dans le new.

et dans form1

Code:

---

1 2 3

Form1.Visible = False Dim f As Form2 = New Form2(Form1) f.Show()

---

Merci rv26t, mais dès le 1er code je suis coincé (très débutant)
Je détaille. Voilà ma 1ère fenêtre
Pièce jointe 160415
ma 2ème fenêtre
Pièce jointe 160416
Normalement, avec ce code:

Code:

---

1 2 3

Private Sub BT_Europe_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_Europe.Click Form2.Show() End Sub

---

Form2 apparaît, mais Form1 reste visible
mais avec votre 1er code:

Code:

---

1 2 3 4 5

Private Sub BT_Europe_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_Europe.Click Form1.Visible = False ' Me.Visible = False Dim f As Form2 = New Form2 f.Show() End Sub

---

ça donne une erreur
Pièce jointe 160418
Pouvez-vous m'aider? merci

Le message d'erreur indique d'utiliser Me à la place. Ainsi il utilise l'instance courante.

Code:

---

1 2 3 4 5

Private Sub BT_Europe_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_Europe.Click Me.Visible = False Dim f As Form2 = New Form2 f.Show() End Sub

---

Comment créez-vous Form1 ?

Il y a toujours erreur (je travaille dans visual 2010)

Code:

---

1 2 3 4 5

Private Sub BT_Europe_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_Europe.Click Me.Form1.Visible = False ' Me.Visible = False Dim f As Form2 = New Form2 f.Show() End Sub

---

Erreur:
Pièce jointe 160427

Salut stracoma,

rv26t t'explique depuis le début que lorsque tu souhaites faire référence à "Form1" dans "Form1" qu'il te faille utiliser "Me" :
Il y a juste à mettre le commentaire à la place et ça fonctionne .... c'est magique :

Code:

---

1 2 3 4 5 6

Private Sub BT_Europe_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_Europe.Click Me.Visible = False Me ' Form1.Visible = False Dim f As Form2 = New Form2 f.Show() End Sub

---

A+

Tiré de MSDN ; Me : Permet de faire référence à l'instance spécifique d'une classe dans laquelle le code est en cours d'exécution.

Regardez la ligne de code que je vous propose (post4)

Citation:

---

Envoyé par rv26t

Code:

---

Me.Visible = False

---

---

Regardez la ligne que vous avez écrit (post5)

Citation:

---

Envoyé par stracoma

Code:

---

Me.Form1.Visible = False

---

---

Il y a une différence.
Indice : Wallace1 vous indique aussi le problème.


Comment créez-vous Form1 ? Pour la suite cela s'avèrera utile.

Merci à vous infiniment. Je trouve mon bonheur dans ce site (j'apprend la programmation pour le plaisir, mon métier n'a rien avoir avec l'informatique, à notre époque il n'y avait pas d'informatique à l'école, j'ai les neurones un peu vielles, > 51 ans, mais je trouve toujours une solution dans ce forum)
Revenons à mon programme, effectivement j'ai mal lu le code, mais avec "Me.visible=False" ça marche. Mais déjà à ce début de mon programme j'ai 2 remarques à faire:
1- à la place de ce code:

Code:

---

1 2 3 4 5

Private Sub BT_Europe_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_Europe.Click Me.Visible = False ' Me.Visible = False Dim f As Form2 = New Form2 f.Show() End Sub

---

N'est-il pas plus simple de faire

Code:

---

1 2 3 4

Private Sub BT_Europe_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BT_Europe.Click Me.Visible = False ' Me.Visible = False Form2.Visible = True End Sub

---

2- Avec ce code quant je quitte Form2 en cliquant sur "X", tout se bloque, je ne plus rien écrire sur le code. D'après mon analyse, Form1 est toujours devant moi mais elle invisible, ce qui bloque l'écriture sur le code; c'est juste? Donc je dois écrire sur code de Form2

Code:

---

1 2 3 4

Private Sub Form2_closed(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.FormClosed Form1.Visible = True   End Sub

---

pour revenir (ou plutôt faire réapparaître) Form1 . ou bien

Code:

---

1 2 3

Private Sub Form2_closed(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.FormClosed End End Sub

---

pour sortir complètement de l'exécution du programme.
mon_analyse.vrai=True?:D

Bonjour stracoma,

Il n'est pas utile de nous dire que tu débutes....on le voit....et je ne le répéterais jamais assez on à tous été débutant un jour ;)
De plus ne crois pas que nous autres travaillons forcément dans la branche informatique ou que nous sommes pour la plupart développeur de métier ......

Brefff...... C'est à base de lecture que tu progresseras et qu'on évitera (comme je le fais en ce moment) d'insister sur des notions de base que tu devrais acquérir avec de l'investissement personnel (un bon livre de chevet en somme).

Revenons-en à nos moutons :

Pour connaitre la différence entre ces 2 bouts de code je te recommande d'arpenter la POO (Programmation Orientée Objet) :

Ce 1er snippet instancie un objet "f" (de type Form2) depuis la classe "Form2".

Code:

---

1 2 3

Dim f As Form2 = New Form2 f.Show()

---

Dans ce 2ème snippet Form2 a déjà été instancié et on affecte True à la propriété Visible.

Code:

---

1 2	Form2.Visible = True

---

Pour le reste il faut que tu apprennes à maitriser ton EDI (Environnement de Développement) et les subtilités du debogage, mode pas à pas.

Tu devrais faire de ceci ton livre de chevet si tu comptes continuer dans la programmation :

http://plasserre.developpez.com/cours/vb-net/

A+

Citation:

---

Envoyé par stracoma

1 -
à la place de ce code:

Code:

---

1 2	Dim f As Form2 = New Form2 f.Show()

---

---

Ici nous utilisons les concept de la POO. Nous devons normalement travailler ainsi.

Citation:

---

Envoyé par stracoma

N'est-il pas plus simple de faire

Code:

---

Form2.Visible = True

---

---

De cette façon (sans instancier Form2), cela fonctionne aussi, c'est une facilité offerte par VB mais qui n'est pas recommendée.
Si l'on suit en pas à pas, on verra qu'il effectue le load (s'il y en a un) (ou mettre un - messagebox.show("dans sub load") - dans l'évènement Form2_Load) et ensuite affiche la fenêtre en faisant un show implicite (mettre un - messagebox.show("dans sub show") - dans l'évènement Form2_Shown). Mais ce n'est pas une bonne pratique. (même si une simple affectation de propriété déclenche tous les mécanismes de création et semble plus simple. Ce n'est pas POO.)
@Wallace1 : ici il y avait un petit piège.;)

Citation:

---

Envoyé par stracoma

2- Avec ce code quant je quitte Form2 en cliquant sur "X", tout se bloque, je ne plus rien écrire sur le code. D'après mon analyse, Form1 est toujours devant moi mais elle invisible, ce qui bloque l'écriture sur le code;
Donc je dois écrire sur code de Form2 Form1.Visible = True pour revenir (ou plutôt faire réapparaître) Form1. ou bien End pour sortir complètement de l'exécution du programme.
mon_analyse.vrai=True?:D

---

True ;)

Mais pour le réaffichage, il faut savoir comment vous avez créé Form1 ?

J'ai ajouté Form3 et tout marche à merveille. Mais avant de vous poser mon nouveau soucis, je n'ai pas bien compris cette question:

Citation:

---

Mais pour le réaffichage, il faut savoir comment vous avez créé Form1 ?

---

A l'ouverture de visual basic , le 1er formulaire windows créé est Form1 (ce qui j'ai compris de la question).
Retournons à mon nouveau défis. Avant de vous solliciter j'ai cherché depuis > 1h30 sans succès. Comment créer un événement pour le clic droit
Pièce jointe 160478
J'espère que vous avez compris problème (bleu)
Merci à vous

Votre première erreur m'intriguais. Mais bon, c'est ok.

Pour le retour sur l'appelant, sujet traité dans mon post2 (dans l'Edit en complément) ainsi pas besoin de clic droit ou gauche.

Citation:

---

Envoyé par rv26t

Afin de compléter un peu le premier cas de figure, pour rendre form2 indépendant, tu peux surcharger son constructeur pour qu'il reçoive une fenêtre en paramètre et rendre la fenêtre appelante visible sur la fermeture de form2.

---

Voir code dans ce post
Appliquer ce principe sur form3 pour répondre au schéma.

Maintenant le sujet est-il vraiment de détecter le clic droit ?

Ce code est un peu complexe pour moi, mais je ne baisse pas les bras, il faut juste du temps

Mon code n'était pas très détaillé.
Il suffit de comprendre le mécanisme et le code devient plus clair, je détaille et commente.

En fait, à la création de Form2 je lui donne un paramètre qui est la fenêtre appelante (celle qui cré et appele Form2).
Ainsi Form2 sait quelle fenêtre est à l'origine de sa création, et quand form2 se ferme, elle remet visible celle qui l'avait créée.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

Public Class Form2   ''' <summary>Variable de type form qui référence le form (form appelant) qui a créé et ouvert Form2 </summary> Private _formAppelant As Form   ''' <summary>Un nouveau constructeur qui permet de référencer le form appelant</summary> ''' <param name="paramFormAppelant">(form appelant) Le form qui a créé et ouvert Form2</param> ''' <remarks>paramFormAppelant est disponible uniquement dans le constructeur</remarks> Sub New(paramFormAppelant As Form) InitializeComponent() ' obligatoire ' comme paramFormAppelant est uniquement disbonible dans le constructeur, on l'affecte à la variable _formAppelant qui sera disponible pour toute la classe _formAppelant = paramFormAppelant End Sub   Private Sub form2_FormClosed(sender As System.Object, e As System.Windows.Forms.FormClosedEventArgs) Handles MyBase.FormClosed ' nous quittons, nous repositionnons le form appelant (celui qui a créé et ouvert form2) a visible. _formAppelant.Visible = True End Sub

---

et dans form1 (le form appelant), il faudra peut-être utiliser Me à la place de Form1

Code:

---

1 2 3 4 5

Form1.Visible = False ' Création et instanciation de form2, Form2 reçoit en paramètre form1 (il faudra peut-être mettre Me) Dim f As Form2 = New Form2(Form1) ' affichage de Form2 f.Show()

---

rv26t, bonsoir.
J'ai lu, qu'un programme peut être fait de plusieurs façons (mènent vers le même résultat).
Ce que fait votre code, je l'ai fais d'une autre façon

Code:

---

1 2 3 4 5 6 7 8

Public Class Form1   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Me.Visible = False Form2.Visible = True End Sub   End Class

---

Code:

---

1 2 3 4 5 6 7 8 9

Public Class Form2 Private Sub Butto2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Me.Visible = False Form3.Show() End Sub Private Sub Form2_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed Form1.Visible = True End Sub End Class

---

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Public Class Form3   Private Sub Form3_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed Form2.Visible = True Me.Visible = False   End Sub   Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click End End Sub End Class

---

Votre code est très probablement fait avec la poo que je n'ai pas encore lu, c'est ce que je dois entamer cette semaine, donc je n'ai rien compris à votre code même avec vos commentaires.
Mon code parait plus simple, mais c'est sûr, si on a inventé la poo, c'est qu'elle a d'autres avantages que j'ignore pour le moment.
Je vous donnerai de mes nouvelles quand j’aurais fini avec la poo (mais je n'ai qu'1h/j de libre, ça va prendre du temps!)
Et je vous remercie infiniment