Wydarzenie "OnClick" wydarzenie?
Ty precyzować że precyzować musieć…:
"Gdy the użytkownik klikać the zamknięty guzik" ("The Zamknięty guzik",… znaczenie *the* okno standard zamknięty guzik, the mały "X" w the górny prawa strona okno)
… nie…
"Gdy the użytkownik klikać *my* zamknięty guzik.
W Ten Sposób nasz kod być na the Zamknięty wydarzenie i the Rozładowywać wydarzenie zamknięty.
Jeżeli ty chcieć the kod na "Twój" zamknięty guzik, then używać kod jak chcieć:
Intymny Okręt podwodny btmClose_Click ()
Ciemnawy bytAnswer Sznurek
Jeżeli Instock.Value <> (0) Wtedy
bytAnswer = MsgBox ("Wyjście teraz? ", vbYesNo, "Wyjście? ")
Jeżeli bytAnswer = vbYes Wtedy
'Robić nic
ElseIf bytAnswer = vbNo Wtedy
Me.Instock.SetFocus
Wyjście Okręt podwodny
Kończyć Jeżeli
Inny
'Robić Nic
Kończyć Jeżeli
DoCmd.Close
Kończyć Okręt podwodny
Pamiętać tutaj że ty biedak mówić mówić inny kod (jeśli wogóle) być teraźniejszy na twój zamknięty guzik już, więc ten kod móc pociągać.
W końcu, pamiętać że gdy ty kodować twój swój zamknięty guzik ty mieć pewny że ty zakrywać wszystkie the ewentualność dla the różnorodny stan że the dane móc opuszczać wewnątrz.
I być pewny 2toria móc jednakowy działanie kod.
; -)
JeffCoachman