logo UsualSoft   Skip Navigation Links
Accueil
Références
Formations
TutorielsExpand Tutoriels
Liens téléchargements

Contact : usualsoft@outlook.fr
Microsoft Certified Professional

Cours : Visual-Basic

Les messages utilisateur

Claude Gruchet

Les messages à l’utilisateur

Les messages à l’utilisateur sont affichés via l’instruction MsgBox. Elle affiche une fenêtre modale, ou boite de dialogue, avec un message, une icône et un titre. Nous verrons ici un exemple pour chaque façon différente d’utiliser MsgBox toutefois la liste n’est pas exhaustive et nous vous conseillons fortement de consulter l’aide de VB6 à ce sujet pour compléter vos connaissances.

msgBox

L’instruction MsgBox comporte donc 3 arguments et s’utilise de la façon suivante :

        MsgBox "Ceci est un message utilisateur ", vbInformation, " Titre du message "

Le deuxième argument est le code de l’icône utilisée, il y a 4 icônes possibles : vbInformation (ci-dessus), vbExclamation (point d’exclamation), vbQuestion (Point d’interrogation), vbCritical (erreur critique).

 

Cas particulier de la confirmation utilisateur

Dans le cas où un message simple ne suffit pas mais que l’on attend une réponse simple de l’utilisateur à une question posée (Oui / Non ; Abandonner / Réessayer / Ignorer, etc. …) on utilise la fonction MsgBox (et non plus l’instruction).

Le deuxième argument servira non seulement à indiquer l’icône désirée mais aussi les boutons nécessaires à la réponse attendue. La fonction MsgBox, comme toute fonction, nous renverra une valeur qui reflétera le choix fait par l’utilisateur.

Par exemple pour demander confirmation d’une action à entreprendre par oui ou non on fera :

        If MsgBox( " Êtes vous sûr ? ", vbQuestion + vbYesNo, " Confirmation ") <> vbYes then
            Exit Sub
        End If

 

Saisie d’une chaîne simple par l’utilisateur

Dans le cas où la réponse ne peut se limiter à un simple click sur un bouton mais demande une saisie alphanumérique simple on utilise la fonction InputBox. Cette fonction comporte les même arguments que MsgBox plus quelques autres (valeur par défaut, position de la fenêtre, aide associée). Consultez l’aide de Visual-Basic pour la liste complète.

Inutile donc de créer un formulaire pour une saisie alphanumérique simple.

La boite de dialogue ci-dessus est obtenue par l’appel suivant :

        Dim lstr as String

        lstr = InputBox("Votre saisie", "Titre", "Valeur par défaut")

La valeur sera retournée dans la variable lstr qui sera une chaîne vide si l’utilisateur a fait " annuler ".