Microsoft Office Access
uređuje Branislav Mihaljev, MVP

Kalkulator i kalendar nad poljima forme

Nivo:
NIVO 3 - Prilozi na ovom nivou su namenjeni naprednim korisnicima, onima koji se već dobro snalaze u programima i onima koji već imaju iskustva u naprednim tehnikama. Ovom nivou pripadaju preporuke i trikovi koje bi trebalo da savlada svako ko teži dugotrajnom i efikasnom radu u Office programima.

Koliko ono beše 37x22,5? Koji je tačno datum drugog petka u sledećem mesecu? Dok unosite podatke u formu u Accessu, mogli biste se pomoći funkcijama koje se pojavljuju posle duplog klika na polje...

Prilikom rada u Accessu, naročito u aplikacijama za finansije, korisnici često drže otvoren i Windowsov program Calculator, jer se pojavljuje potreba da se s vremena na vreme nešto jednostavnije izračuna. Pri unosu je često pri ruci i jedan kalendar ("Koji ono beše datum u četvrtak?").

Na Internetu smo pronašli, a onda malo i preradili MDB datoteku u kojoj su dve funkcije koje će pomoći korisnicima pri unosu rezultata računanja i datuma u aplikaciju. Na polje forme u koju treba uneti datum ili rezultat, na događaj duplog klika mišem se postavlja funkcija koja otvara odgovarajuću podformu (kalkulator ili kalendar). Korisnik u kalkulatoru obavlja jednostavna računanja ili se kreće po kalendaru tražeći datum; i zatim se pritiskom na dugme U redu rezultat prenosi sa podforme na formu gde se unose podaci.

	Uz ovaj prilog možete preuzeti datoteku Calc-Cal97.ZIP, koja sadrži spakovanu MDB bazu za Access 97, koja će nakon uvoza raditi valjano i u Accessu 2000/2002.

Za sintaksu i način korištenja podformi otvorite bazu iz priloga u Accessu 97 ili novijem; ako otvorite bazu u Accessu 2000/2002, od vas će se tražiti da konvertujete bazu u novi format; pritom dajte test-bazi novo ime.

Obratite pažnju da u VBA okruženju (videti u Tools/References) morate imati uključenu jednu od verzija (što noviju) Microsoft DAO biblioteke, jer je program pisan upravo za DAO biblioteku; ovako je učinjeno da bi se ostvarila kompatibilnost priloga u raznim verzijama.

Da biste forme Kalkulator i Kalendar preneli u svoju aplikaciju, otvoritwe svoju bazu, pa iz menija File / Get External Data odaberite opciju Import i prenesite sledeće objekte iz baze u prilogu:

forme: zsfrmCalc, zsfrmCalendar
moduli: basCalc, basCalendar, basMB_CONSTANTS

Nakon uvoza u vašu aplikaciju, na polju za vrednost gde postoji potreba za pomoćnim računanjem iskoristite događaj OnDblClick i tamo upišite:

=PopupCalc(Screen.ActiveControl)

Slično, za polje sa datumom, na događaj OnDblClick upišite:

=PopupCalendar(Screen.ActiveControl)

Napomena:
Uslužne funkcije Kalkulator i Kalendar su preuzete sa Interneta.
U javnom su vlasništvu, ali je autor nepoznat i zbog toga nedostaje odgovarajuća oznaka. Prvobitna verzija je urađena za Access 2, a ova u prilogu je prilagođena srpskom govornom području i verzijama Accessa počev od 97.