Christophe Mathysen a écrit, le 14/05/2007 12:55 :
Comment puis-je faire pour récupérer la valeur du MSG Box ?
Salut,
En louchant un peu vers l'extérieur (il faut voir si les valeurs sont
les mêmes)
<http://msdn2.microsoft.com/fr-fr/library/139z2azd(VS.80).aspx>
Référence du langage Visual Basic
MsgBox, fonction (Visual Basic)
Affiche un message dans une boîte de dialogue, attend que l'utilisateur
clique sur un bouton, puis retourne un nombre entier qui indique le
bouton choisi par l'utilisateur.
Public Function MsgBox( _
ByVal Prompt As Object, _
Optional ByVal Buttons As MsgBoxStyle = MsgBoxStyle.OKOnly, _
Optional ByVal Title As Object = Nothing _
) As MsgBoxResult
Paramètres
Prompt
Requis. Expression String affichée comme message de la boîte de
dialogue. La longueur maximale de l'argument Prompt est d'environ 1 024
caractères selon la largeur des caractères utilisés. Si Prompt se
compose de plusieurs lignes, vous pouvez séparer les lignes à l'aide
d'un retour chariot (13 Chr( )), d'un saut de ligne (10 Chr( )) ou d'une
combinaison des deux caractères (13 Chr( )& 10 Chr( )).
Buttons
Facultatif. Expression numérique qui représente la somme des
valeurs spécifiant le nombre et le type de boutons à afficher, le style
d'icône à utiliser, l'identité du bouton par défaut, ainsi que la
modalité du message. Si l'argument Buttons est omis, la valeur par
défaut est zéro.
Title
Facultatif. Expression String affichée dans la barre de titre de la
boîte de dialogue. Si l'argument Title est omis, le nom de l'application
est placé dans la barre de titre.
ParamètresParamètres
Les valeurs d'énumération MsgBoxStyle sont répertoriées dans le tableau
suivant.
Membre Valeur Description
OKOnly
0
Affiche le bouton OK uniquement.
OKCancel
1
Affiche les boutons OK et Annuler.
AbortRetryIgnore
2
Affiche les boutons Abandonner, Réessayer et Ignorer.
YesNoCancel
3
Affiche les boutons Oui, Non et Annuler.
YesNo
4
Affiche les boutons Oui et Non.
RetryCancel
5
Affiche les boutons Réessayer et Annuler.
Critical
16
Affiche l'icône Message critique.
Question
32
Affiche l'icône Requête d'avertissement.
Exclamation
48
Affiche l'icône Message d'avertissement.
Information
64
Affiche l'icône Message d'information.
DefaultButton1
0
Le premier bouton est le bouton par défaut.
DefaultButton2
256
Le deuxième bouton est le bouton par défaut.
DefaultButton3
512
Le troisième bouton est le bouton par défaut.
ApplicationModal
0
L'application est modale. L'utilisateur doit répondre au message avant
de poursuivre le travail dans l'application en cours.
SystemModal
4096
Le système est modal. Toutes les applications sont interrompues jusqu'à
ce que l'utilisateur réponde au message.
MsgBoxSetForeground
65536
Spécifie la fenêtre de message comme fenêtre de premier plan.
MsgBoxRight
524288
Le texte est aligné à droite.
MsgBoxRtlReading
1048576
Spécifie que le texte doit apparaître de droite à gauche sur les
systèmes hébraïques et arabes.
Le premier groupe de valeurs (0-5) décrit le nombre et le type des
boutons affichés dans la boîte de dialogue. Le second groupe (16, 32,
48, 64) décrit le style de l'icône. Le troisième groupe (0, 256, 512)
détermine quel bouton est la valeur par défaut. Le quatrième groupe (0,
4096) détermine la modalité du message, et le cinquième groupe indique
si la fenêtre de message est la fenêtre de premier plan, avec
l'alignement et l'orientation du texte. Au moment d'additionner ces
nombres pour obtenir la valeur finale de l'argument Buttons, ne
sélectionnez qu'un seul nombre dans chaque groupe.
Valeur de retourValeur de retour
Constante Valeur
OK
1
Cancel
2
Abort
3
Retry
4
Ignore
5
Yes
6
No
7
ExceptionsExceptions
Type d'exception Numéro de l'erreur Condition
ArgumentException
5
Prompt n'est pas une expression String ou Title n'est pas valide.
InvalidOperationException
5
Le processus ne s'exécute pas en mode utilisateur interactif.
InvalidEnumArgumentException
5
Au moins un paramètre n'est pas un membre de l'énumération MsgBoxResult
ou MsgBoxStyle.
Consultez la colonne « Numéro d'erreur » si vous mettez à niveau des
applications Visual Basic 6.0 qui utilisent la gestion des erreurs non
structurée. (Vous pouvez comparer le numéro d'erreur par rapport à
Number, propriété (objet Err).) Toutefois, lorsque cela est possible,
vous devez envisager de remplacer un tel contrôle d'erreur par Vue
d'ensemble de la gestion structurée des exceptions pour Visual Basic.
NotesNotes
Si la boîte de dialogue est dotée d'un bouton Annuler, appuyer sur Échap
équivaut à cliquer sur Annuler. Si la boîte de dialogue contient un
bouton Aide, cela signifie qu'une aide contextuelle relative à la boîte
de dialogue est disponible. Toutefois, aucune valeur n'est retournée
tant que l'utilisateur n'a pas cliqué sur l'un des autres boutons.
RemarqueRemarque
Si vous souhaitez préciser plus d'informations que celles fournies par
le premier argument, vous devez utiliser la fonction MsgBox dans une
expression. Si vous omettez certains arguments de position, vous devez
quand même conserver la virgule de séparation correspondante.
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]