Gælder for
Formularobjekt |
Du kan bruge egenskaben TilladRedigeringer til at angive, om en bruger kan tilføje en post, når der bruges en formular. Læs/skriv boolesk.
udtryk.TilladTilføjelser
udtryk Påkrævet. Et udtryk, der returnerer et af objekterne på listen Gælder for.
Indstilling
Egenskaben TilladTilføjelser anvender følgende indstillinger.
Indstilling |
Visual Basic |
Beskrivelse |
Ja |
Sand |
(Standard) Brugeren kan tilføje nye poster. |
Nej |
Falsk |
Brugeren kan ikke tilføje nye poster. |
Du kan indstille egenskaben TilladTilføjelser ved hjælp af formularens egenskabsark, en makro eller VBA-kode (Visual Basic for Applications).
Bemærkninger
Angiv egenskaben TilladTilføjelser til Nej for at give brugere tilladelse til at få vist eller redigere eksisterende poster, men ikke tilføje nye poster.
Hvis du vil forhindre ændringer i eksisterende poster (gøre en formular skrivebeskyttet), skal du angive egenskaberne TilladTilføjelser, TilladSletninger og TilladRedigeringer til Nej. Du kan også gøre poster skrivebeskyttede ved at angive egenskaben Postsættype til Snapshot.
Hvis du vil åbne en formular kun til dataindtastning, kan du angive formularens Dataindtastning-egenskab til Ja.
Når egenskaben TilladTilføjelser er angivet til Nej, er kommandoen Ny post under Poster på fanen Data ikke tilgængelig.
Bemærk!: Når argumentet Datatilstand for handlingen ÅbnFormular anvendes, tilsidesætter Microsoft Office Access 2007 en række egenskabsindstillinger for formularen. Hvis argumentet Datatilstand for handlingen ÅbnFormular er indstillet til Rediger, åbner Access formularen med følgende egenskabsindstillinger:
-
TilladRedigeringer – Ja
-
TilladSletninger – Ja
-
TilladTilføjelser – Ja
-
Dataindtastning – Nej
Hvis du vil forhindre handlingen ÅbnFormular i at tilsidesætte nogen af de eksisterende egenskabsindstillinger, skal du udelade indstillingen for argumentet Datatilstand, så Access anvender de egenskabsindstillinger, der defineres af formularen.
Eksempel
Følgende eksempel undersøger egenskaben Kontrolelementtype for alle kontrolelementer i en formular. For hvert navne- og tekstfeltkontrolelement slå proceduren egenskaben Reliefvirkning til eller fra for disse kontrolelementer. Når egenskaben Reliefvirkning for navnekontrolelementet er angivet til Skyggevirkning, og egenskaben Reliefvirkning for tekstfeltkontrolelementet er angivet til Normal, og egenskaberne TilladTilføjelser, TilladSletninger og TilladRedigeringer er angivet til Sand, skiftes variablen intCanEdit for at tillade redigering af de underliggende data.
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