MuokkaaminenSallittu-ominaisuus

Käytetään kohteeseen
Access for Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Koskee seuraavia

Lomakeobjekti

AllowEdits-ominaisuuden avulla voit määrittää, voiko käyttäjä muokata tallennettuja tietueita lomaketta käytettäessä. Totuusarvo, jolla on luku- ja kirjoitusoikeudet.

lauseke. MuokkaaminenSallittu

Ilmaisun Tarvitaan. Lauseke, joka palauttaa jonkin Koskee seuraavia -luettelon objekteista.

Asetus

MuokkaaminenSallittu -ominaisuus käyttää seuraavia asetuksia.

Asetus Visual Basic Kuvaus
Kyllä Tosi (Oletus) Käyttäjä voi muokata tallennettuja tietueita.
Ei Epätosi Käyttäjä ei voi muokata tallennettuja tietueita.

      

Voit määrittää Sallitut-ominaisuuden käyttämällä lomakkeen ominaisuusikkunaa, makroa tai Visual Basic for Applications (VBA) -koodia.

Huomautuksia

MuokkaaminenSallittu-ominaisuuden avulla voit estää lomakkeessa näkyvien nykyisten tietojen muutokset. Jos haluat estää tietyn ohjausobjektin tietojen muutokset, käytä Käytössä- tai Lukittu-ominaisuutta.

Jos haluat estää olemassa olevien tietueiden muutokset (tehdä lomakkeesta vain luku -muotoisen), aseta LisääminenSallittu-, PoistaminenSallittu-, ja MuokkaaminenSallittu-ominaisuuksien arvoksi Ei. Voit myös määrittää tietueet vain luku -muotoon valitsemalla Tietuejoukon laji -asetukseksi Näyttökuva-vaihtoehdon.

Kentän arvon muuttaminen ohjelmallisesti aiheuttaa nykyisen tietueen muokkauksen Sallitut-ominaisuuden asetuksesta riippumatta. Jos haluat estää käyttäjää tekemästä muutoksia tietueeseen (AllowEdits is No), jota sinun on muokattava ohjelmallisesti, tallenna tietue ohjelmamuutosten jälkeen. AllowEdits-ominaisuusasetusta kunnioitetaan jälleen, kun nykyisen tietueen tallentamattomat muutokset on tallennettu.

Huomautus

Kun AvaaLomake-toiminnon Tietotila-argumentti on määritetty, Microsoft Office Access 2007 ohittaa useita lomakkeen ominaisuusasetuksia. Jos Tietojen syöttötila -argumentin asetuksena AvaaLomake-toiminnossa on Muokkaa, Access avaa lomakkeen seuraavilla ominaisuusasetuksilla:

  • MuokkaaminenSallittu – Kyllä
  • PoistaminenSallittu – Kyllä
  • LisääminenSallittu – Kyllä
  • TietojenSyöttäminen – Ei

Jotta AvaaLomake-toiminto ei ohittaisi mitään näistä olemassa olevista ominaisuusasetuksista, ohita Tietojen syöttötila -argumentin asetus niin, että Access käyttää lomakkeen määrittämiä ominaisuusasetuksia.

Esimerkki

Seuraavassa esimerkissä tutkitaan kaikkien lomakkeen ohjausobjektien Ohjausobjektilaji-ominaisuutta. Toimenpide ottaa Erikoistehoste-ominaisuuden käyttöön ja poistaa sen käytöstä kullekin otsikolle ja tekstiruutuohjausobjektille. Kun seliteohjausobjektien SpecialEffect-ominaisuuden arvoksi on määritetty Varjostettu ja tekstiruutuohjausobjektien SpecialEffect-ominaisuuden arvoksi on määritetty Normaali ja AllowAdditions-, AllowDeletions- ja AllowEdits-ominaisuuksien arvoksi on määritetty Tosi, intCanEdit muuttujaa käytetään pohjana olevien tietojen muokkaamisen sallimiseksi.

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