Pomoću akcije CancelEvent možete poništiti događaj zbog kojeg je program Access pokrenuo makronaredba s ovom akcijom. Naziv makronaredbe postavka je svojstva događaja, na primjer BeforeUpdate, OnOpen, OnUnload ili OnPrint.
Napomena: Akcija makronaredbe CancelEvent nije dostupna u web-aplikacijama programa Access.
Postavka
Akcija CancelEvent nema argumenata.
Napomene
Na obrascu obrazac obično koristite akciju CancelEvent unutar makronaredbe provjera valjanosti sa svojstvom događaja BeforeUpdate. Kada korisnik unese podatke u kontrola ili slog, Access će pokrenuti makronaredbu prije dodavanja podataka u bazu podataka. Ako se ne zadovolje uvjeti provjere valjanosti koje sadrži makronaredba, akcija CancelEvent prekinut će postupak ažurirati prije nego i započne.
Tu ćete akciju često koristiti u kombinaciji s akcijom MsgBox da biste ukazali da podaci nisu zadovoljili uvjete provjere valjanosti te da biste pružili korisne informacije o vrsti podataka koji se moraju unijeti.
Akcija CancelEvent može prekinuti sljedeće događaje.
|
ApplyFilter |
Dirty |
MouseDown |
|
BeforeDelConfirm |
Exit |
NoData |
|
BeforeInsert |
Filter |
Open |
|
BeforeUpdate |
Format |
|
|
DblClick |
KeyPress |
Unload |
|
Delete |
Napomena: Akciju CancelEvent možete koristiti u kombinaciji s događajem MouseDown jedino za prekidanje događaja koji se dogodi nakon što desnom tipkom miša kliknete objekt.
Ako postavka svojstva događaja OnDblClick kontrole određuje makronaredbu koja sadrži akciju CancelEvent, akcija će prekinuti događaj DblClick.
Zadana funkcija (to jest ono što će Access obično učiniti kada događaj nastupi) za događaje koji se mogu prekinuti počinje nakon pokretanja makronaredbe za taj događaj. To omogućuje poništavanje zadanog načina funkcioniranja. Ako, primjerice, u načinu tekstni okvir dvokliknete riječ na kojoj se nalazi točka umetanja, Access će u pravilu označiti tu riječ. Takav zadani način funkcioniranja možete poništiti u makronaredbi za događaj DblClick te izvršiti neku drugu akciju, primjerice otvoriti obrazac s informacijama o podacima u tekstnom okviru. Zadana funkcija događaja koji se ne mogu prekinuti izvršava se prije pokretanja makronaredbe.
Napomena: Ako svojstvo događaja OnUnload obrasca određuje makronaredbu koja izvršava akciju CancelEvent, nećete moći zatvoriti obrazac. Morate ispraviti uvjet koje uzrokuje izvršavanje akcije CancelEvent ili otvoriti makronaredbu pa izbrisati akciju CancelEvent. Ako je riječ o obrascu obavezni, nećete moći otvoriti makronaredbu.
Da biste akciju CancelEvent pokrenuli u modulu Visual Basic for Applications (VBA), upotrijebite metodu CancelEvent objekta DoCmd.
Primjer
Provjera valjanosti podataka pomoću makronaredbe
Sljedeća makronaredba provjere valjanosti provjerava poštanske brojeve unesene na obrazac Dobavljači. Pokazuje korištenje akcija StopMacro, MsgBox, CancelEvent i GoToControl. Uvjetni izraz provjerava državu ili regiju te poštanski broj unesen u zapis na obrascu. Ako poštanski broj nije u ispravnom obliku zemlje ili regije, makronaredba prikazuje okvir s porukom i ne sprema zapis. Zatim vas vraća na kontrolu Poštanski Broj gdje možete ispraviti pogrešku. Ta se makronaredba mora pridružiti svojstvu BeforeUpdate na obrascu Dobavljači.
|
Uvjet |
Akcija |
Argumenti: Postavka |
Komentar |
|
IsNull([ZemljaRegija]) |
StopMacro |
Ako je svojstvo ZemljaRegija Null, nije moguće provjeriti valjanost poštanskog broja. |
|
|
[ZemljaRegija] In ("Francuska","Italija","Španjolska") And Len([Poštanski broj]) <> 5 |
MsgBox |
Poruka: poštanski broj mora sadržavati pet znakova. Beep: Da Vrsta: Informacija Naslov: pogrešan poštanski broj |
Ako poštanski broj ne sadrži pet znakova, prikaži poruku. |
|
... |
CancelEvent |
Poništava događaj. |
|
|
GoToControl |
Naziv kontrole: PoštanskiBroj |
||
|
[ZemljaRegija] In ("Australija","Singapur") And Len([Poštanski broj]) <> 4 |
MsgBox |
Poruka: poštanski broj mora sadržavati četiri znaka. Beep: Da Vrsta: Informacija Naslov: pogrešan poštanski broj |
Ako poštanski broj ne sadrži četiri znaka, prikaži poruku. |
|
... |
CancelEvent |
Poništava događaj. |
|
|
GoToControl |
Naziv kontrole: PoštanskiBroj |
||
|
([ZemljaRegija] = "Kanada") And ([Poštanski broj] Not Like"[A-Z][0-9][A-Z] [0-9][A-Z][0-9]") |
MsgBox |
Poruka: poštanski broj nije valjan. Primjer kanadskog koda: H1J 1C3 Beep: Da Vrsta: Informacija Naslov: pogrešan poštanski broj |
Ako poštanski broj nije u obliku kanadskog poštanskog broja, prikaži poruku. (Primjer kanadskog poštanskog broja: H1J 1C3) |
|
... |
CancelEvent |
Poništava događaj. |
