MSGBOX PERSONNALISABLE 1.001

BOITE DE DIALOGUE MSGBOX PERSONNALISABLE

V1.001
HONORE M.A.H.J
TEAM EXCELLAB, appligestconseil@gmail.com


Call Msg(MonMessage, Délai, TypeMessage, NumTypeBouton, TypeIcône, BoutonDéfaut, ModalitéZoneMessage)

---> Explications

MonMessage => Définit le message.


Délai => délai affichage message
0=message fixe, pas de délai


TypeMessage => Titre


NumTypeBouton => définit le numéro et le type de boutons affichés

vbOKOnly 0 => 0 => Affiche le bouton OK uniquement.

vbOKCancel => 1 => Affiche les boutons OK et Annuler.

vbAbortRetryIgnore =>2 => Affiche le bouton Abandonner, Recommencer et Ignorer.

vbYesNoCancel => 3 => Affiche les boutons Oui, Non et Annuler.

vbYesNo => 4 => Affiche les boutons Oui et Non.

vbRetryCancel =>5 => Affiche les boutons Recommencer et Annuler.



TypeIcône => décrit le type d'icône affiché

16 => Affiche l'icône Requête d'avertissement(Message critique)

32 => Affiche l'icône Requête d'avertissement(vbQuestion)

48 => Affiche l'icône Message d'avertissement (vbExclamation)

64 => Affiche l'icône Message d'information(vbInformation)



BoutonDéfaut => définit le bouton par défaut.

vbDefaultButton1 => 0 => Le premier bouton est le bouton par défaut.

vbDefaultButton2 => 256 => Le deuxième bouton est le bouton par défaut.

vbDefaultButton3 => 512 => Le troisième bouton est le bouton par défaut.

vbDefaultButton4 => 768 => Le quatrième bouton est le bouton par défaut.



ModalitéZoneMessage => détermine la modalité de la zone de message

vbApplicationModan=> Boîte de dialogue modale. L'utilisateur doit répondre au message affiché dans la zone de message avant de pouvoir continuer de travailler dans l'application en cours.

vbSystemModal =>4096 => Modal système. Toutes les applications sont interrompues jusqu'à ce que l'utilisateur réponde au message affiché dans la zone de message.

Code source : Microsoft

Les suggestions et commentaires constructifs sont les bienvenus!