[VB] Forms et MenuItem

Forms et MenuItem [VB] - VB/VBA/VBS - Programmation

Marsh Posté le 01-12-2004 à 23:16:47    

Salut a tous,
 
je suis en train de créer un petit programme a base VB avec une BD SQL.  
 
Mon programme contient une form qui se nomme Moniteur en plus de la FormPrincipal. Je veux appeler le Moniteur lorsque je click sur l'Item Moniteur du menu Affichage. Quand je click, le Moniteur s'ouvre et un petit crochet se met a coté de l'item du menu. Mon Moniteur est appelé avec Show() et non ShowDialog(), car je veux pouvoir revenir dans mon FormPrincipal tout en travaillant avec le Moniteur a coté.
 
Voici mon probleme:
 
Comment fermer le Moniteur lorsque je click sur l'Item Moniteur du menu Affichage? J'ai essayé ce code ci dans mon Item du Menu:
 

Code :
  1. Dim Moniteur As New FormMoniteur
  2.         If OptionMoniteur.Checked = False Then
  3.             OptionMoniteur.Checked = True
  4.             Moniteur.Show()
  5.         ElseIf OptionMoniteur.Checked = True Then
  6.             OptionMoniteur.Checked = False
  7.             Moniteur.Close()
  8.         End If


 
Sa ne fonctionne pas. Le moniteur reste ouvert. Je sais que je pourrais le faire a l'aide d'un DialogResult, mais je veux pouvoir avoir mes 2 Forms et travailler sur chacune d'elles en meme temps.
 
Aussi, j'aimerais que le crochet de l'item du menu se décoche si j'appuis sur le X ou Fermer dans mon Moniteur. Comment faire?
 
Merci de votre aide! :)

Reply

Marsh Posté le 01-12-2004 à 23:16:47   

Reply

Marsh Posté le 03-12-2004 à 11:33:43    

Salut,
 
Si VB fonctionne comme VBA excel, tu peut essayer :
 
Moniteur.Hide
 
Ne travaillant que sur VBA excel je ne connais pas cette notion de DialogResult. J'espére que cela pourra t'aider.
;-)


---------------
WSAL
Reply

Marsh Posté le 03-12-2004 à 23:10:12    

Malheureusement cela ne fonctionne pas. Je viens de comprendre mon erreur en essayer ta commande ;) Voici donc pourquoi cela ne fonctionnait pas.
 
Ma déclaration de mon formulaire Moniteur se faisait dans ma méthode de menu uniquement. Donc a chaque fois que j'appuyais sur le bouton du menu, un nouvel objet se créait, de la pourquoi le Close et Hide ne fonctionnent pas. Un nouvel objet est créé et fermé immédiatement. Alors on met la déclaration dans les variables en haut du .vb et tout fonctionne a merveille :)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed