CODES SOURCES - MODULE -     Exercice : Ce programme utilise un module une feuille Form. Un bouton "Quitter" permet de quitter l'application. Dans le programme principal, il n'y a qu'une instruction. Cette instruction est placée derrière le bouton de commande. Il s'agit de l'appel d'une procédure contenue dans un module. L'intérêt d'écrire un tel module est qu'il est réutilisable dans tous les programmes, seul l'appel de ce module est à réécrire dans les programmes principaux. Il est donc intéressant de réutiliser ses propres modules afin de ne pas réécrire toujours les mêmes codes sources. Des informations sur l'utilisation des modules sont indiquées dans la rubrique "cours".   L'interface :  Cette interface est très basic, il s'agit d'une feuille Form sur laquelle a été placé un bouton de commande nommé "CmdQuitter".       Le code source du module Public Sub SubQuitter()     Dim boite As VbMsgBoxResult 'Déclaration d'une variable qui va contenir _         le choix de l'utilisateur en fonction qu'il clique sur Yes ou No dans la _         boite de dialogue.         'Affichage de la boîte de dialogue de fermeture     boite = MsgBox("Voulez - vous vraiment quitter l'application ?", vbYesNo, "Confirmation")     If boite = vbYes Then End   'Si le choix est Yes, on ferme l'application End Sub   Le code source du bouton "CmdQuitter" Private Sub CmdQuitter_Click() ModuleQuitter.SubQuitter   'Appel du module et plus précisément _ de la procédure "SubQuitter" contenu dans le module. End Sub                         ©Copyright Webmaster 2002