Odnosi se na
Objekat obrasca |
Možete da koristite svojstvo AllowAdditions da biste naveli da li korisnik može da doda zapis kada koristi obrazac. Čitanje/pisanje Bulovih vrednosti.
expression.AllowAdditions
expression Obavezno. Izraz koji daje jedan od objekata sa liste „Odnosi se na“.
Postavka
Svojstvo AllowAdditions koristi sledeće postavke.
Postavka |
Visual Basic |
Opis |
Da |
True |
(Podrazumevano) Korisnik može da doda nove zapise. |
Ne |
False |
Korisnik ne može da doda nove zapise. |
Svojstvo AllowAdditions možete da podesite pomoću list svojstva, makro ili Visual Basic for Applications (VBA) koda obrasca.
Primedbe
Postavite svojstvo AllowAdditions na opciju Ne da biste korisnicima dozvolili da prikazuju ili uređuju postojeće zapise, ali ne i da dodaju nove zapise.
Ako želite da sprečite promene na postojećim zapisima (napravite obrazac samo za čitanje), postavite svojstva AllowAdditions, AllowDeletions i AllowEdits na opciju Ne. Zapise možete da napravite samo za čitanje i tako što ćete svojstvo RecordsetType postaviti na opciju Snimak.
Ako želite da otvorite obrazac samo za unos podataka, postavite svojstvo DataEntry obrasca na opciju Da.
Kada se svojstvo AllowAdditions postavi na opciju Ne, komanda Novi zapis u okviru Zapisi na kartici Podaci nije dostupna.
Napomena: Kada se koristi argument „Režim podataka“ radnje OpenForm, Microsoft Office Access 2007 će zameniti jedan broj postavki svojstava obrazaca. Ako je argument „Režim podataka“ radnje OpenForm postavljen na opciju Uređivanje, Access će otvoriti obrazac uz sledeće postavke svojstava:
-
AllowEdits – Da
-
AllowDeletions – Da
-
AllowAdditions – Da
-
DataEntry – Ne
Da biste sprečili radnju OpenForm da zameni bilo koje od postojećih postavki svojstava, izostavite postavku argumenta „Režim podataka“ kako bi Access koristio postavke svojstava koje definiše obrazac.
Primer
Sledeći primer ispituje svojstvo ControlType za sve kontrole u obrascu. Za svaku kontrolu oznake i okvira za tekst, procedura uključuje/isključuje svojstvo SpecialEffect za te kontrole. Kada je svojstvo SpecialEffect kontrole oznake postavljeno na opciju Osenčeno, svojstvo SpecialEffect kontrola okvira za tekst je postavljeno na opciju Normalno, a svojstva AllowAdditions, AllowDeletions i AllowEdits su sva postavljena na opciju True, promenljiva intCanEdit se uključuje da bi se dozvolilo uređivanje osnovnih podataka.
Sub ToggleControl(frm As Form)
Dim ctl As Control
Dim intI As Integer, intCanEdit As Integer
Const conTransparent = 0
Const conWhite = 16777215
For Each ctl in frm.Controls
With ctl
Select Case .ControlType
Case acLabel
If .SpecialEffect = acEffectShadow Then
.SpecialEffect = acEffectNormal
.BorderStyle = conTransparent
intCanEdit = True
Else
.SpecialEffect = acEffectShadow
intCanEdit = False
End If
Case acTextBox
If .SpecialEffect = acEffectNormal Then
.SpecialEffect = acEffectSunken
.BackColor = conWhite
Else
.SpecialEffect = acEffectNormal
.BackColor = frm.Detail.BackColor
End If
End Select
End With
Next ctl
If intCanEdit = IFalse Then
With frm
.AllowAdditions = False
.AllowDeletions = False
.AllowEdits = False
End With
Else
With frm
.AllowAdditions = True
.AllowDeletions = True
.AllowEdits = True
End With
End If
End Sub