Théorie

      Interface

    Série 1

     Série 2

       Série 3

       Série 4

. 
CRÉATION D'UN MENU ET ÉVÉNEMENT MOUSEMOVE
(Tiré des fiches de Mme Claudette Bélanger)

.

Les menus déroulants sont un rectangle de commandes ou d’options qui s’ouvre à l’écran dès que l’on clique sur des mots inscrits dans une barre de menus. 

L’événement MouseMove indique que l’exécution du code est déclenchée par le mouvement de la souris.

1. Débutez un nouveau projet. Donnez les propriétés suivantes à la feuille.

FEUILLE: F1_Menu

2. Placez une étiquette en haut à droite de votre feuille et donnez-lui les propriétés suivantes.

ÉTIQUETTE: ET_xy

3. Dans la fenêtre de code de la feuille,  choisissez dans Procédure (case de droite dans le haut)  MouseMove et entrez le code suivant.

4. Dans Objet de la fenêtre de code de la feuille, sélectionnez Général et écrivez le code suivant: Dim V_couleur as long.

5. Exécutez votre application. Cliquez sur la feuille et glissez la souris dans la fenêtre. Observez l’emplacement X et Y de votre curseur dans  l’étiquette  ET_xy.

6. Arrêtez l'exécution Exécution.

Vous allez maintenant ajouter un menu pour contrôler cette application.

7. Dans le menu Outils, sélectionnez Créateur de menu (la feuille doit être sélectionnée et affichée). Voici la fenêtre qui apparaît. 

1. Permet d'entrer le titre (Caption) du menu ou du sous-menu qui sera affiché.

2. Permet d'indiquer le nom (Name) du menu ou du sous-menu.

3. Permet de passer au menu suivant pour entrer ses propriétés.

4. Permet de placer en retrait un nom et ainsi de le considérer comme un sous-menu.

5. Permet de positionner le nom d'un menu comme menu principal.

6. Zone de liste de la fenêtre de création de menu.

8. Créez les menus suivants, en inscrivant le Caption et le Name et en cliquant sur Suivant pour changer de memu. Cliquez ensuite sur OK. Les menus sont maintenant en haut de votre feuille.

9. Dans le menu Couleur, sélectionnez Rouge. La fenêtre de code de ce menu apparaît. Ajoutez le code suivant: V_couleur = RGB (255,0,0). De la même manière, dans la fenêtre de code de MN_vert ajoutez V_couleur = RGB (0,255,0). Finalement, dans MN_bleu, V_couleur = RGB (0,0,255).

10. Dans la fenêtre de code de MN_2, inscrivez DrawWidth = 2 et dans MN_5, DrawWidth = 5. Finalement, dans MN_efffacer, écrivez CLS .

11. Sauvegardez dans votre sous-répertoire VB_Module2 sous les noms E8F1xx.FRM et EX8xx.VBP.

12. Exécutez votre application et testez toutes les options des menus.

13. Ajoutez un menu Quitter dans votre application. Il s'agit du menu habituel avec demande de confirmation.

14. Sauvegardez à nouveau sous les mêmes noms.

Pour les mordus...

Condition: être en avance de deux fiches sur la moyenne du groupe. Il faut donc vérifier avec l'enseignant avant de le faire. Un bonus de 2 pts sera ajouté sur un travail au choix du prof.

• Sachant que RGB(0,0,0) donne noir, ajoutez un sous-menu au menu Couleur permettant de dessiner en noir.

• Ajoutez une cinquième couleur de votre choix au menu Couleur.

• Ajoutez les tailles 1, 3 et 4 au menu Crayon.