SÉRIE 2 *

 

Théorie

      Interface

    Série 1

     Série 2

       Série 3

       Série 4

. 
BOÎTES DE DIALOGUE InputBox, InputBox$, MsgBox
(Inspiré des fiches de Mme Claudette Bélanger et des tutoriels de Langlade informatique)

.

Qu’est-ce qu’une fonction?

Une fonction est une instruction effectuant une tâche significative et retournant une valeur au programme.  Cette valeur est généralement mémorisée dans une variable.  Elle peut aussi être directement assignée à une propriété ou à une autre fonction.  Les fonctions utilisent un ou plusieurs arguments définissant leur comportement.  

MsgBox

Cette instruction très utilisée dans Visual Basic. Elle permet de poser une question à l' utilisateur par l'intermédiaire d' une boîte de dialogue dont on peut modifier les paramètres.

La
syntaxe de l' instruction MsgBox est la suivante:

Variable = MsgBox("Message", Type, "Titre de la fenêtre")

  • Variable  est la variable de type Entier (Integer) recevant la valeur du bouton cliqué.

  • Le paramètre Message est la chaîne de caractères (le texte) affichée comme message dans la boîte de dialogue.

  • Le paramètre Type  est une expression numérique qui contrôle les boutons et les icônes à afficher.  Si vous ne mettez pas ce paramètre, l'instruction MsgBox n'affichera que le bouton «OK». Voici les constantes à utiliser pour afficher les boutons.

vbOKOnly  0 Affiche le bouton OK uniquement
vbOKCancel 1 Affiche les boutons Ok et Annuler
vbCancelRetryIgnore 2 Affiche les boutons Abandonner, Répéter et Ignorer
vbYesNoCancel 3 Affiche les boutons Oui, Non et Annuler
vbYesNo 4 Affiche les boutons Oui et Non
vbRetryCancel 5 Affiche les boutons Répéter et Annuler

Voici les constantes à utiliser pour afficher les icônes.

vbCritical 16 Affiche l'icône message critique
vbQuestion 32 Affiche l' icône requête d' avertissement
vbExclamation 48 Affiche l'icône message d' avertissement
vbInformation 64 Affiche l'icône message d'information

Voici les constantes permettant de déterminer le bouton par défaut.

vbDefaultButton 10 Le premier bouton est le bouton par défaut
vbDefaultButton 256 Le deuxième bouton est le bouton par défaut
vbDefaultButton 512 Le troisième bouton est le bouton par défaut

Chaque bouton, lorsqu'il est activé, renvoie une valeur qu'on peut interpréter au travers de la variable. Voici ces valeurs.

vbOk 1 OK
vbCancel 2 Annuler
vbAbort 3 Abandonner
vbRetry 4 Réessayer
vbIgnore 5 Ignorer
vbYes 6 Oui
vbNo 7 Non
  • Le paramètre Titre de la fenêtre est la chaîne de caractères (texte) affichée dans la barre de titre de la boîte de dialogue.

Exemple 1

MsgBox Message$, 3, Titre$
'Affichage d'un message avec les boutons Oui, Non et Annuler

Exemple 2

T$ = "Attention"      'Titre du message
M$ = "Désirez-vous vraiment quitter le programme ?"
   'Message à afficher
Reponse% = MsgBox(M$, 4 + 32, T$) 
'32 est une constante qui affiche l'icône requête d'avertissement
If Reponse% = 6 Then End
    'Sortie du programme 

InputBox et InputBox$

Visual Basic propose une fonction simple permettant de créer une boîte de dialogue InputBox

La syntaxe de l' instruction InputBox est la suivante:

var = InputBox$(invite$, titre$, defaut$, xpos%, ypos%)

  • Var est la variable dans laquelle sera enregistré le résultat obtenu par InputBox$.
  • Le paramètre Invite$ est le texte saisi par l' utilisateur. Vous pouvez utiliser les caractères Chr$(13) + Chr$(10) pour forcer une ligne. 

  • Le paramètre Titre$ contient éventuellement le titre de la boîte de dialogue.

  • Le texte Defaut$ est proposé au moment de l' ouverture de la boîte de dialogue.

  • Xpos% et Ypos% permettent de positionner la boîte, en l'absence de ces valeurs, la boîte de dialogue est centrée.

La différence entre InputBox et InputBox$ est que la première forme retourne une valeur de type VARIANT et la seconde de type STRING. N'oubliez pas que le type VARIANT utilise beaucoup de mémoire.

Exemple

Dim Titre$, Invite$, Defaut$, Xpos%, Ypos%, TitreFinal$
'Initialiser les variables
Titre$ = "Identification"
Invite$ = "Entrez le nom de votre mère: "
Defaut$ = "Maman"
Xpos% = 100
Ypos% = 100
TitreFinal$ = InputBox$(Invite$, Titre$, Defaut$, Xpos%, Ypos%)
MsgBox (TitreFinal$)   
'Affichage du résultat                     

 

Ce site est optimisé pour Microsoft Internet Explorer en 800x600.Copyright © {2003} {ESLS - Yvon Lemay}. Tous droits réservés.

 Design by
LOGOSLAND CREATIONS