Tutoriel 11 : MsgBox - Instruction ou fonction ?

Cette instruction très utilisée dans Visual Basic permet de poser une question à l'utilisateur au travers d'une boîte de dialogue.
Celle-ci peut être paramétrée en définissant le nombre de boutons poussoir, l'icône de la boîte et le bouton par défaut, c'est à dire celui qui sera enfoncé quand vous appuyez sur la touche « Entrée ».
La syntaxe de l'instruction MsgBox est la suivante :

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

• Variable : Variable de type Entier (Integer) recevant la valeur du bouton.
• Message : Chaîne de caractères affichée comme message dans la boîte de dialogue.
• Type : Expression numérique qui contrôle les boutons et les icônes à afficher.
• Titre : Expression chaîne affichée dans la barre de titre de la boîte de dialogue.

Le paramètre Type représente l'addition de plusieurs constantes intégrées de Visual Basic.

Pour répondre à la question posée, MsgBox est utilisée en Instruction lorsque la syntaxe utilisée n'attend pas une réponse du système par exemple :

Instruction :
MsgBox Message$, 16 Titre$ Dans ce cas nous avons utilisé une instruction de VB.

Fonction :
Dans le cas d'une fonction, (qui attend une réponse du système) nous écrirons :

T$ = "Attention"      'Titre du message
M$ = "Désirez-vous vraiment quitter le programme ?"      'Message à afficher

si votre message à afficher est plus long, vous pouvez utiliser la concaténation suivante,

M$ = M$ + " suite du message" (vous pouvez aussi utiliser le caractère "&" à la place du caractère "+")
Reponse% = MsgBox(M$, 4 + 32, T$)

et voici la réponse que vous pouvez éventuellement utiliser :

If Reponse% = 6 Then End      'Sortie du programme

J'utilise depuis Vb 3.0 la fonction précédente qui fonctionne sous toutes les versions connues à ce jour.
Nous allons les étudier en détail avec les tableaux suivants.

Les constantes pour les boutons :

Les constantes pour les icônes :

Les constantes pour le bouton par défaut :

Chaque bouton lorsqu'il est activé, renvoie une valeur que l'on pourra interpréter au travers de la variable.
Si vous ne mettez pas le paramètre « Type », l'instruction MsgBox n'affichera que le bouton « OK »


Les constantes renvoyées par MsgBox :

Le code suivant montre un exemple de paramétrage de boîte de dialogue MsgBox avec retour de valeur d'une variable :

Private Sub Button_Supprime_Click ( )
Dim Sup
Sup = MsgBox("Veuillez confirmer la suppression du fichier", vbCritical + vbYesNo + 256, "Attention")
If Sup = vbYes Then
      MsgBox "Suppression confirmée"
End If
End Sub

Nous aurions pu écrire :

Sup = MsgBox("Veuillez confirmer la suppression du fichier", 16 + 4 + 256, "Attention")

Faites des essais avec toutes les combinaisons possibles ou bien téléchargez le module d'exemples qui vous permettra de constater de visu toutes les combinaisons possibles de MsgBox [ici]
Voici les fenêtres que vous devez obtenir :