Salut,
voici un exemple de code pour le bouton help
Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = 'Souhaitez-vous continuer?' ' Définit le message.
Style = vbYesNo + vbQuestion + vbMsgBoxHelpButton ' Définit les boutons.
Titre = 'Démonstration de MsgBox ' ' Définit le titre.
aide = 'c:\\STSOFT.HLP' ' Définit le fichier d'aide attention qu'il y a un backslashe derrière les : mais celui-ci ne s'affiche pas !!!
Ctxt = 0 ' Définit le contexte de la rubrique (obligatoire), je mets 0 pour ne pas avoir de msg d'erreur
' Affiche le message.
Response = MsgBox(Msg, Style, Titre, aide, Ctxt)
if reponse=vbyes then
MyString=1 'fait un action si ok
else
MyString=0 'fait une autre action si pas ok
end if
Voilà j'espère que ça pourra t'aider à comprendre le fonctionnement de ce bouton.
Bonne soirée.
Message édité par: john, à: 28/11/2005 18:15