Svojstvo AllowEdits

Odnosi se na

Pomoću svojstva AllowEdits možete odrediti može li korisnik uređivati spremljene zapise prilikom korištenja obrazac. Booleovi izrazi za čitanje/pisanje.

izraz.AllowEdits

expression Obavezno. Izraz koji vraća jedan od objekata na popisu Primjenjuje se na.

Postavka

Svojstvo AllowEdits koristi sljedeće postavke.

Svojstvo AllowEdits možete postaviti pomoću koda obrasca list svojstava, makronaredba ili koda programa Visual Basic for Applications (VBA).

Napomene

Svojstvo AllowEdits možete upotrijebiti da biste spriječili promjene postojećih podataka prikazanih u obrascu. Ako želite spriječiti promjene podataka u određenoj kontroli, upotrijebite svojstvo Enabled ili Locked.

Ako želite spriječiti promjene postojećih zapisa (obrazac postaviti samo za čitanje), postavite svojstva AllowAdditions, AllowDeletions i AllowEdits na Ne. Zapise možete postaviti samo za čitanje i tako da svojstvo RecordsetType postavite na Snimka stanja.

Programska promjena vrijednosti polja uzrokuje da se trenutni zapis može uređivati bez obzira na postavku svojstva AllowEdits . Ako želite spriječiti korisnika da unosi promjene u zapis (AllowEditsje Ne) koji morate programski uređivati, spremite zapis nakon programskih promjena; postavka svojstva AllowEdits ponovno će biti počašćena nakon spremanja nespremljenih promjena trenutnog zapisa.

• AllowEdits – Da

• AllowDeletions – Da

• AllowAdditions – Da

• DataEntry – Ne

Da biste spriječili da akcija OpenForm nadjača neku od navedenih postojećih postavki svojstva, izostavite postavku argumenta načina rada podataka, pa će Access koristiti postavke svojstva određene obrascem.

Primjer

U sljedećem je primjeru prikazano svojstvo ControlType za sve kontrole na obrascu. Za svaku oznaku i kontrolu tekstnog okvira procedura uključuje/isključuje svojstvo SpecialEffect za te kontrole. Ako je svojstvo SpecialEffect za kontrolu oznake postavljeno na Osjenčano, a svojstvo SpecialEffect za kontrolu tekstnog okvira na Normalno te svojstva AllowAdditions, AllowDeletions i AllowEdits postavljena na True, varijabla intCanEdit uključena je i omogućeno je uređivanje pozadinskih 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