Les boites de message

La boite de message - MsgBox -

Petite boite d'un usage simple mais au combien utile. Cette boite affiche votre message et reste à l'écran aussi longtemps que le lecteur ne clique sur le bouton OK pour confirmer la bonne réception du message.

La syntaxe est de plus simple :

    MsgBox "votre texte"

Voici un exemple :

    MsgBox "Message reçu ?"

Cette boite de message sera souvent utilisée pour corriger les scripts présentant des erreurs. Ainsi, MsgBox variable, affichera le contenu de la variable à cet endroit du script ou MsgBox "jusqu'ici", vous permettra de voir jusqu'où se déroule le script erroné. Nous y reviendrons dans le chapitre intitulé "Les messages d'erreurs".

Vous pouvez aussi afficher du texte sur plusieurs lignes. Pour se faire, il suffit d'employer le mot-clé vbCrLf ou Chr (13) ou Chr (13) & Chr (10).
Ainsi MsgBox "Ligne 1" & vbCrLf & "Ligne 2" & Chr(13) & "Ligne 3", affichera dans la boite de message :
Ligne 1
Ligne 2
Ligne 3


 

La boite de message - Alert -

Assurément un emprunt au Javascript, la fonction Alert permet également d'afficher un boite de message. Tout comme MsgBox, Alert ouvre une petite fenêtre avec votre texte et un bouton OK. Aussi longtemps que le lecteur n'aura pas confirmé par un clic sur ce bouton, le processus sera bloqué.

La syntaxe est :

    Alert "votre texte"

Un exemple ?

    Alert "Message reçu ?"

Votre oeil perspicace aura remarqué que la fenêtre s'intitule "Microsoft Internet Explorer" ou lieu de Visual Basic. A mon sens, plus joli.


 

La boite de saisie - InputBox -

Avec la boite de saisie, vous pouvez accroître l'interactivité avec votre lecteur et obtenir de sa part d'autres réponses que oui, non, etc.

La syntaxe est simple :

    InputBox "votre texte" , "le titre de la boite" , "la valeur par défaut"

Voici un exemple :

InputBox "Quel est votre prénom?", "Demande d'information", "Luc"

La boite de saisie ne comporte pas d'icônes et les seuls boutons sont OK et Cancel.
La valeur ainsi entrée par le lecteur pourra être récupérée dans une variable qui sera traitée dans d'autres lignes de code VBscript.


 

La boite de message - MsgBox - évoluée

On peut utiliser la boite MsgBox pour une plus grande interactivité qu'un simple (stupide?) bouton de confirmation. C'est le premier attribut (attribut-bouton), celui du choix des boutons.

Constante Bouton(s) affiché(s)
vbOk OK seulement (par défaut)
vbOkCancel OK et Cancel
vbAbortRetryIgnore Abort, Retry et Ignore
vbYesNoCancel Yes, No et Cancel
vbYesNo Yes et No
vbRetryCancel Retry et Cancel

On peut modifier la petite icône qui accompagne la boite de message. C'est l'attribut-icône.

Constante Icône affichée
vbCritical un X (pour erreur fatale)
vbQuestion un point d'interrogation (pour une question)
vbExclamation un point d'exclamation (pour une remarque)
vbInformation un I (pour une information)

Et si la mention "Visual Basic" de la fenêtre par défaut ne vous enchante guère, le titre de cette fenêtre peut aussi être modifié.

La syntaxe bien entendu, évolue :

    MsgBox "votre texte" , attribut-bouton + attribut-icône, "titre de la fenêtre"

MsgBox renvoie une valeur de retour qui indique que le lecteur a cliqué sur tel ou tel bouton. Selon l'évaluation de ce code retour (voir Chapitre "Les conditions") telle ou telle action pourra être programmée. Ces codes sont 1 pour le bouton OK, 2 pour le bouton Cancel, 3 pour le bouton Abort, 4 pour le bouton Retry, 5 pour le bouton Ignore, 6 pour le bouton Yes et enfin 7 pour le bouton No.

On mettra ce code retour dans une variable (ici code). L'écriture prendra la forme :
Dim code
code = MsgBox("texte" , attribut-bouton )