Proprietatea AllowEdits

Se aplică la

Puteți utiliza proprietatea AllowEdits pentru a specifica dacă un utilizator poate edita înregistrările salvate atunci când utilizează un formular. Boolean în citire/scriere.

expresie.AllowEdits

expresie Obligatoriu. O expresie care returnează unul dintre obiectele din lista Se aplică la.

Setare

Proprietatea AllowEdits utilizează următoarele setări.

Puteți seta proprietatea AllowEdits utilizând foaie de proprietăți formularului, un macrocomandă sau cod Visual Basic for Applications (VBA).

Observații

Puteți utiliza proprietatea AllowEdits pentru a împiedica modificările datelor existente afișate de un formular. Dacă doriți să împiedicați modificările datelor dintr-un anumit control, utilizați proprietatea Enabled sau Locked.

Dacă doriți să împiedicați modificarea înregistrărilor existente (să faceți un formular doar în citire), setați proprietățile AllowAdditions, AllowDeletions și AllowEdits la No. De asemenea, puteți face înregistrările doar în citire dacă setați proprietatea RecordsetType la Snapshot.

Modificarea prin programare a unei valori de câmp face ca înregistrarea curentă să fie editabilă, indiferent de setarea proprietății AllowEdits. Dacă doriți să împiedicați utilizatorul să efectueze modificări la o înregistrare (AllowEdits este No) pe care trebuie s-o editați prin programare, salvați înregistrarea după orice modificări de programare; setarea de proprietate AllowEdits va fi onorată din nou după ce se salvează modificările nesalvate la înregistrarea curentă.

• AllowEdits — Da

• AllowDeletions — Da

• AllowAdditions — Da

• DataEntry — Nu

Pentru a împiedica acțiunea OpenForm să înlocuiască oricare dintre aceste setări de proprietate existente, omiteți setarea argumentului Mod de date, astfel încât Access să utilizeze setările de proprietate definite de formular.

Exemplu

Următorul exemplu examinează proprietatea ControlType pentru toate controalele dintr-un formular. Pentru fiecare control etichetă și text casetă, procedura activează proprietatea SpecialEffect pentru acele controale. Atunci când proprietatea SpecialEffect a controalelor etichetă este setată la Shadowed, iar proprietatea SpecialEffect a controlului casetă text este setată la Normal, în timp ce proprietățile AllowAdditions, AllowDeletions și AllowEdits sunt toate setate la True, variabila intCanEdit este setată să permită editarea datelor subiacente.

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