IBM Lotus Symphony
|
Affiche une boîte de dialogue contenant un message.
MsgBox Text As String [,Type As Integer [,Dialogtitle As String]] (As Statement) ou MsgBox (Text As String [,Type As Integer [,Dialogtitle As String]]) (As Function)
Text : expression de type chaîne de caractères se présentant sous forme de message dans la boîte de dialogue. Vous pouvez insérer des passages à la ligne à l'aide de Chr$(13).
DialogTitle : expression de type chaîne de caractères affichée dans la barre de titre de la boîte de dialogue. Si ce paramètre n'est pas spécifié, la barre de titre affiche le nom de l'application active.
Type : tout expression de type nombre entier spécifiant le type de la boîte de dialogue, le nombre et le type de boutons à afficher, ainsi que le type d'icônes. Type représente une combinaison de configurations binaires, c'est-à-dire une combinaison d'éléments déterminée par l'ajout de leurs valeurs respectives :
0 : affiche uniquement le bouton OK.
1 : affiche les boutons OK et Annuler.
2 : affiche les boutons Interrompre, Réessayer et Ignorer.
3 : affiche les boutons Oui, Non et Annuler.
4 : affiche les boutons Oui et Non.
5 : affiche les boutons Réessayer et Annuler.
16 : ajoute l'icône Arrêt dans la boîte de dialogue.
32 : ajoute l'icône Question à la boîte de dialogue.
48 : ajoute l'icône Message d'avertissement à la boîte de dialogue.
64 : ajoute l'icône Message d'information à la boîte de dialogue.
128 : désigne le premier bouton de la boîte de dialogue comme bouton par défaut.
256 : désigne le deuxième bouton de la boîte de dialogue comme bouton par défaut.
512 : désigne le troisième bouton de la boîte de dialogue comme bouton par défaut.
Sub ExampleMsgBox
Const sText1 = "Une erreur imprévue s'est produite."
Const sText2 = "Néanmoins, l'exécution du programme va se poursuivre."
Const sText3 = "Erreur"
MsgBox(sText1 + Chr(13) + sText2,16,sText3)
End sub