Bouton de commande sur access
willson181
Messages postés
6
Statut
Membre
-
PBGunner Messages postés 64 Statut Membre -
PBGunner Messages postés 64 Statut Membre -
Bonjour,
Bonjour,
j'ai créé un bouton de commande nommé "Quitter" dans le formulaire de connexion (access). je voudrais savoir comment programmer ça pour que lorsque je clique là-dessus pour quitter access une boite de dailogue avec un message "voulez vous quitter access) et avec 3 options ( Oui - Non - Annule) apparaisse. ce qui me permettra de cliquer sur "oui" si je veux quitter, "non" si je veux pas et annuler pour rester au formulaire de connexion. j'utilise windows xp - microsoft office 2003
Merci d'avance de votre aide.
Bonjour,
j'ai créé un bouton de commande nommé "Quitter" dans le formulaire de connexion (access). je voudrais savoir comment programmer ça pour que lorsque je clique là-dessus pour quitter access une boite de dailogue avec un message "voulez vous quitter access) et avec 3 options ( Oui - Non - Annule) apparaisse. ce qui me permettra de cliquer sur "oui" si je veux quitter, "non" si je veux pas et annuler pour rester au formulaire de connexion. j'utilise windows xp - microsoft office 2003
Merci d'avance de votre aide.
A voir également:
- Bouton de commande sur access
- Invite de commande - Guide
- Commande terminal mac - Guide
- Diagnostic bouton photo - Accueil - Outils
- Commande dism - Guide
- Bouton on/off comment savoir ✓ - Forum Matériel & Système
1 réponse
Salut!
La commande NON n'est elle pas identique a la commande ANNULE?
Sur ton formulaire, dans les propriétés du bouton Quitter tu ajoute une procédure évenementielle sur clic.
L'idée est d'utiliser un MessageBox a 3 boutons plutot que refaire un formulaire dédié...
Voici le script associé:
La commande NON n'est elle pas identique a la commande ANNULE?
Sur ton formulaire, dans les propriétés du bouton Quitter tu ajoute une procédure évenementielle sur clic.
L'idée est d'utiliser un MessageBox a 3 boutons plutot que refaire un formulaire dédié...
Voici le script associé:
Private Sub Quitter_Click()
'Définir les variables qui vont contenir les textes
msg = "voulez vous quitter access?" ' Définit le message qui apparait
Style = vbYesNoCancel + vbDefaultButton3 ' Définit les boutons Oui/non/Cancel (valeur par défaut).
Title = "Sortir de l'application Access" ' Définit le titre de la fenetre
Response = MsgBox(msg, Style, Title) ' Affiche le message et définie la variable de réponse.
'ensuite on choisi le cas qui nous convient et on définie les actions associées
Select Case Response
Case vbYes
[Action de fermeture de l'application].
'Si tu peux sortir de l'application par d'autres boutons, je te conseille de créer
'un sous programme et de l'appeler a cet endroit
Case vbNo
[Action de fermeture du formulaire en cours puis du formulaire de connexion]
'ne connaissant pas ce que tu appelle formulaire de connexion, je considère
'qu'il s'agit d'un formulaire classique
Case Else
DoCmd.close 'ferme le formulaire en cours si la réponse est Cancel
End Select
MsgBox MyString
End Sub
