Microsoft Office Access
uređuje Branislav Mihaljev, MVP

Osobina Tag u Accessu

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.

Ako programirate aplikacije u Accessu, a ne koristite svojstvo Tag, onda sebi verovatno činite lošu uslugu, a možda i štetu. Pogledajte šta se sve može izvesti pomoću ove osobine objekata.

Korisnicima programa Ventura, pojam "tag" je poznat: to je zapis koji definiše skup osobina objekta. Isto ime i sličnu namenu ima i jedan veoma koristan, ali retko korišćen elemenat u izradi aplikacije u Accessu. Reč je, naime, o jednoj "praznoj" osobini (svojstvu) čiju svrhu možete definisati sami, tako što ćete osmisliti konvenciju i upisati određene vrednosti osobine u više kontrola i objekata, a potom u prostoj If petlji ispitati vrednost i odmah uticati na njihovo stanje u jednom potezu, umesto pojedinačno. Naravno, osobina Tag se može koristiti i nad samo jednom kontrolom, ali je diskutabilno da li je takva primena celishodna. Sve će biti jasnije na primeru.

Svojstvo Tag je naročito korisno za brzo formatiranje grupe objekata. Za opis svojstva se koristi string koji može biti dug do 2048 karaktera i sadržati bilo kakav tekst. Za primer, pretpostavićemo da postoji određeni broj polja neke forme koja ćemo u određenim situacijama sakriti prostim pritiskom na taster, u odnosu na određeni događaj ili u odnosu na prava koja trenutni korisnik aplikacije ima.

Otvorite formu u režimu za izmene, pa označite sva polja i kontrole (tastere, liste, itd) koje želite da u određenom trenutku sakrijete u isto vreme. Zatim na kartici osobina u polje Tag ukucajte tekst Sakrij. Za kontrolu efekta, formirajte jedan probni taster i pod njegov događaj OnClick postavite sledeći kod:

Dim ctl As Control

For Each ctl In Me.Controls
   If ctl.Tag = "Sakrij" Then
      ctl.Visible = False
   End If
Next

Kada kliknete na taster, program će proveriti osobinu Tag svake kontrole u formi i ako je ona postavljena na Sakrij, kontrola će postati nevidljiva.

Ovaj primer možete razvijati i dalje, tako što ćete sa bilo koje tačke u aplikaciji referencirati kritičnu formu, pa uz proveru određenih uslova sakrivati ili otkrivati kontrole. Efikasnost ove tehnike je očigledna: pomislite samo kako biste sakrili dvadesetak kontrola na formi jednu po jednu - ovih nekoliko redova programa bi se pretvorilo u "čaršav". Naravno, na sličan način, upotrebom vrednosti osobine Tag možete programski menjati i ostale osobine kontrola (boju, font, izgled, itd.), pa čak i upravljati strukturom aplikacije. Dva kilobajta za zapis vrednosti osobine Tag je i više nego dovoljno, pa uz malu manipulaciju dšanjem aplikacije, a da pritom sve osnovne osobine objekata i kontrola koristite iskelovima stringa možete izvesti veoma složenu strukturu za upravljanje ponaljučivo namenski.