MuokkaaminenSallittu-ominaisuus

Koskee seuraavia

MuokkaaminenSallittu-ominaisuuden avulla voit määrittää, voiko käyttäjä muokata tallennettuja tietueita, kun käytössä on lomake. Totuusarvo, jolla on luku- ja kirjoitusoikeudet.

lauseke.MuokkaaminenSallittu

lauseke Pakollinen. Lauseke, joka palauttaa jonkin Koskee seuraavia -luettelon objekteista.

Asetus

MuokkaaminenSallittu -ominaisuus käyttää seuraavia asetuksia.

Voit määrittää MuokkaaminenSallittu-ominaisuuden lomakkeen ominaisuusikkunan, makron tai Visual Basic for Applications (VBA) -koodin avulla.

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.

• 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 Erikoistehoste-ominaisuudeksi on määritetty Varjostettu ja tekstiruutuohjausobjektien Erikoistehoste-ominaisuudeksi on määritetty Normaali ja Sallilisäykset-, PoistaminenSallittu- ja MuokkaaminenSallittu-ominaisuuksien asetuksena on Tosi, intCanEdit-muuttuja sallii pohjana olevien tietojen muokkaamisen.

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