Bouton Fermer VBA Access

Question

Bonjour à tous.

J'ai un seul formulaire (le principal) ou le bouton fermer est activé. Je voudrais que ce bouton ferme toute la BD Access lorsque l'utilisateur clique dessus.

J'utilise pour le moment la méthode doCmd.quit dans la méthode Form_Close() de cette Form. Seulement le gros problème c'est que je ne sais pas différencier la fermeture de la form par le bouton Fermer ou par mon propre code pour passer à une autre Form. Ce qui fait que la BD se ferme dès que je change de Form....

Quelqu'un pourrait me dire comment faire pour éviter cela?

Merci d'avance.

cs_kFar · Answer

salut,

mets l'instruction DoCmd.Quit dans la procédure tonbouton_click()

cs_ElMagnifico · Answer

Euh je parlais du control bouton fermer c'est à dire la croix de fermeture qui se trouve au même niveau que les controls boutons pour agrandir et réduire le formulaire. Je ne connais pas les méthodes liées à ce control...

Je ne parle pas d'un bouton que j'aurais crée moi-même....

salut,

mets l'instruction DoCmd.Quit dans la procédure tonbouton_click()

cs_kFar · Answer

désolé pour l'incompréhension!
je ne connais pas non plus les méthodes liés au bouton fermer.
au pire, tu le vires et tu fais ton propre bouton fermer

cs_ElMagnifico · Answer

Eh bah c'est ce que j'ai fait....et maintenant j'ai un beau bouton avec un panneau STOP à l'intérieur :-)

Merci pour ton aide.
@+

désolé pour l'incompréhension!
je ne connais pas non plus les méthodes liés au bouton fermer.
au pire, tu le vires et tu fais ton propre bouton fermer

ragnagnac · Answer

Pour quitter l'appli et fermer le base, tu utilises DoCmd.Quit, mais pour juste fermer un formulaire, il faut utiliser Docmd.Close ! Voili... :big) 

C'était vraiment très intéressant...  :big)   MythoMAN dans une autre vie !  :clown)

cs_ElMagnifico · Answer

T'es comme KFar tu comprends pas tout du premier coup...Ou alors c'est moi qui me suit mal exprimé...M'enfin c'est pas grave j'ai résolu mon pb autrement.

Merci quand même.

ragnagnac · Answer

Hé ben ! çà donne envie d'essayer d'aider les gens ce genre de remarque !  %-6 

C'était vraiment très intéressant...  :big)   MythoMAN dans une autre vie !  :clown)

cs_Gdal · Answer

T'es comme KFar tu comprends pas tout du premier coup...Ou alors c'est moi qui me suit mal exprimé...M'enfin c'est pas grave j'ai résolu mon pb autrement.


ElMagnifico  :clown)  = ElBourico !  :approve) 

@+
____________________________
L'amour est la victoire de l'imagination sur l'intelligence.

Bouton Fermer VBA Access

8 réponses

Discussions similaires