|
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 |
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
|