OVH Cloud OVH Cloud

Fenêtre "modale"

1 réponse
Avatar
Nicolas
Bonjour,

Sous Access 2000 j'ai un formulaire Formulaire1 sur lequel=20
j'ai un bouton Command0.

Sur clic de ce bouton, cela ouvre un second formulaire=20
Formulaire2.

J'aimerais que le code execut=E9 lors du clic du bouton=20
attende la fermeture du Form2 pour passer =E0 la ligne de=20
code suivante.

Code :

Private Sub Commande0_Click()
stDocName =3D "Formulaire2"
DoCmd.OpenForm "Formulaire2"
MsgBox "Coucou"
End Sub

Dans le cas pr=E9sent la boite de message "Coucou" s'affiche=20
juste apr=E8s l'ouverture du Formulaire2. Je voudrais=20
qu'elle ne s'ouvre que lorsqu'on a ferm=E9 Formulaire2.

Comment dois-je m'y prendre ?

Merci d'avance

Nicolas

1 réponse

Avatar
michel
Bonjour
Ouvre le form en Boite de dialogue
Private Sub Commande0_Click()
stDocName = "Formulaire2"
DoCmd.OpenForm "Formulaire2",,,,,AcDialog
MsgBox "Coucou"
End Sub

HTH
Michel

"Nicolas" a écrit dans le message de news:
07a101c3befd$c428aff0$
Bonjour,

Sous Access 2000 j'ai un formulaire Formulaire1 sur lequel
j'ai un bouton Command0.

Sur clic de ce bouton, cela ouvre un second formulaire
Formulaire2.

J'aimerais que le code executé lors du clic du bouton
attende la fermeture du Form2 pour passer à la ligne de
code suivante.

Code :

Private Sub Commande0_Click()
stDocName = "Formulaire2"
DoCmd.OpenForm "Formulaire2"
MsgBox "Coucou"
End Sub

Dans le cas présent la boite de message "Coucou" s'affiche
juste après l'ouverture du Formulaire2. Je voudrais
qu'elle ne s'ouvre que lorsqu'on a fermé Formulaire2.

Comment dois-je m'y prendre ?

Merci d'avance

Nicolas