aide sur l'appel des formulairesRésolu

Question

salut , je develope sous vb.net , tout marche bien dans mon application sauf que j'ai un tout petit probleme avec mes forms , je m'explique:
au lancement de mon appli j'ai un menu qui fait appel aux differents formulaires en clickant sur les menuItems , le probleme que &#224; chaque fois que je clik sur le menuItem "Mes articles" par exemple , il m'affiche le fomulaire de mes articles meme s'il existe d&#233;ja (il me creer une autre instance du formulaire) comme ca si je click beaucoup sur le meme menuItem je serai oblig&#233; de fermer tous ces formulaire c'est lourd.
voila le code code j'ai mis dans mes menuItems:
 



Private Sub MenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles connexion11.Click
Dim conn As connexion = New connexion
conn.mon_menu = Me
conn.ShowDialog()
End Sub


Private Sub MenuItem5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles gestion_articles.Click
Dim article As Form1 = New Form1
article.MdiParent = Me
article.Show()
End Sub

merci d'avance

Utilisateur anonyme · Accepted Answer

Oui pardon, j'ai oublier de d&#233;charger le pr&#233;c&#233;dent.

Dim article As Form1
Private Sub MenuItem5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles gestion_articles.Click
If article IsNot Nothing Then article.Dispose()
article = New Form1
article.MdiParent = Me
article.Show()
End Sub

Kenji
<hr size="2" width="100%">
Merci de cliquer sur "R&#233;ponse accept&#233;e" si une r&#233;ponse vous convient.

Utilisateur anonyme · Answer

Bonsoir,

C'est tout normal, tu red&#233;clare une nouvelle form &#224; chaque clique du menu.
Il faut donc d&#233;clarer la form en dehors de la fonction:
Ici, &#224; chaque clique sur le menu, il va remplacer la form 'article'

Dim article As Form1
Private Sub MenuItem5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles gestion_articles.Click
article = New Form1
article.MdiParent = Me
article.Show()
End Sub

Kenji
<hr size="2" width="100%">
Merci de cliquer sur "R&#233;ponse accept&#233;e" si une r&#233;ponse vous convient.

amylee1984 · Answer

salut, merci pour ton aide ,j'ai essay&#233; avec ce que tu m'as propos&#233; mais le meme probleme existe encore , merci d'avance

amylee1984 · Answer

salut , merci bcp pour ce bout de code j'ai ajouter juste une petite modification car il me souligne la ligne que t'as jouter


If (
Not article 
Is 
Nothing) 
Then


article.Dispose()



End 
If


article = New Form1


article.MdiParent = 
Me


article.Show()

et comme ca  ca marche nickel , thanks

Aide sur l'appel des formulaires

4 réponses

Discussions similaires