Valide sur les plates-formes Windows et Windows CE
La fonction MessageBox ou MsgBox affiche une fenêtre de message. La fenêtre de message contient un message et un titre, ainsi que les associations de boutons prédéfinis décrits par le paramètre de style.
Pour appeler la fonction, vous pouvez utiliser MsgBox à la place de MessageBox.
Format de la fonction :
MessageBox(message as String, title as String, style as Integer) as Integer
MessageBox(message as String, title as String) as Integer
MessageBox(message as String, style as Integer) as Integer
MessageBox(message as String) as Integer
Identifie la chaîne contenant le message à afficher.
Identifie une chaîne facultative contenant le titre de la fenêtre de message.
Valeur par défaut : DMS
Identifie un entier facultatif indiquant le contenu et le comportement de la fenêtre de message. Le paramètre style peut être l'une des constantes prédéfinies suivantes :
Ajoute une fenêtre avec le bouton OK (par défaut).
Ajoute une fenêtre avec les boutons OK et Annuler.
Ajoute une fenêtre avec les boutons Oui et Non.
Ajoute une fenêtre avec les boutons Réessayer et Annuler.
Ajoute une fenêtre avec les boutons Oui, Non et Annuler.
Ajoute une fenêtre avec les boutons Interrompre, Réessayer et Ignorer
Constantes de modalité de MessageBox
Par défaut, l'utilisateur doit répondre à la zone de message avant de poursuivre son travail dans la fenêtre actuelle ; cependant, l'utilisateur peut accéder à des fenêtres d'autres applications et les utiliser.
Toutes les applications sont interrompues jusqu'à ce que l'utilisateur réponde au message. Les fenêtres de message modales du système sont utilisées pour avertir l'utilisateur d'erreurs sérieuses et potentiellement dangereuses qui nécessitent une intervention immédiate.
Constantes des icônes MessageBox
La situation par défaut est la suivante : Aucune icône n'apparaît.
Ajoute une icône représentant un point d'exclamation dans la fenêtre de message.
Ajoute une icône représentant un i dans un cercle de la fenêtre de message.
Ajoute une icône représentant un point d'interrogation dans la fenêtre de message.
Ajoute une icône de signe Stop (un X blanc dans un cercle rouge) dans la fenêtre de message.
Constantes des boutons par défaut MessageBox
La situation par défaut est la suivante : Le premier bouton est le bouton par défaut.
Active le deuxième bouton par défaut.
Active le troisième bouton par défaut.
Autres constantes
Place la fenêtre de message au premier plan. Si cela n'est pas codé, la fenêtre actuellement au premier plan y reste.
Vous pouvez associer chaque constante d'un groupe à une constante d'un autre groupe. Par exemple, si vous souhaitez afficher une fenêtre de message avec les boutons Interrompre, Réessayer et Ignorer (par défaut), ainsi qu'une icône de signe Stop et que vous souhaitez également interrompre toutes les applications jusqu'à ce que l'utilisateur réponde au message, vous devez utiliser le style suivant :
MB_ABORTRETRYIGNORE + MB_DEFBUTTON3 + MB_ICONSTOP + MB_SYSTEMMODAL
Si le paramètre de style est omis, MB_OK est utilisé par défaut. La fenêtre de message contient alors uniquement le bouton OK.
Si la mémoire est insuffisante pour créer la fenêtre de message, la valeur de retour pour la fonction est zéro. Dans le cas contraire, l'une des valeurs de boutons suivantes est renvoyée par la fenêtre de message :
Valeur 1 ; le bouton OK a été utilisé.
Valeur 2 ; le bouton Annuler (ou la touche Echap du clavier) a été utilisé.
Valeur 3 ; le bouton Interrompre a été utilisé.
Valeur 4 ; le bouton Réessayer a été utilisé.
Valeur 5 ; le bouton Ignorer a été utilisé.
Valeur 6 ; le bouton Oui a été utilisé.
Valeur 7 ; le bouton Non a été utilisé.
Exemple :
Cet exemple demande à l'utilisateur si une copie de sauvegarde du fichier config.sys doit être créée, et si nécessaire, effectue la sauvegarde.
Dim Src,Dst as string
Dim Question as string
Question="Voulez-vous créer une copie de sauvegarde du fichier config.sys ?"
if MessageBox(Question,MB_YESNO)=IDYES then
Src="C:\CONFIG.SYS"
Dst="C:\CONFIG.BAK"
if CopyFile(Src,Dst,True) then MessageBox("CONFIG.BAK créé.")
end if
|
Copyright © 2014 CA Technologies.
Tous droits réservés.
|
|