Egenskaben Ændret

Gælder for

Du kan bruge egenskaben Snavset til at afgøre, om den aktuelle post er blevet ændret, siden den sidst blev gemt. Du kan f.eks. spørge brugeren, om ændringerne i en post var tiltænkt, og hvis ikke, tillade brugeren at flytte til den næste post uden at gemme ændringerne. Læs/skriv boolesk.

udtryk.Snavset

udtryk Påkrævet. Et udtryk, der returnerer et af objekterne på listen Gælder for.

Bemærkninger

Egenskaben Snavset anvender følgende indstillinger.

Denne egenskab er tilgængelig i formularvisninger og Dataarkvisning.

Denne egenskab indstilles eller læses ved hjælp af en makro eller VBA-kode (Visual Basic for Applications).

Når en post gemmes, indstiller Access egenskaben Snavset til Falsk. Når en bruger ændrer en post, indstilles egenskaben til Sand.

Eksempel

I følgende eksempel aktiveres knappen btnUndo, når dataene ændres. Subrutinen UndoEdits( ) kaldes fra hændelsen EfterOpdatering for tekstfeltkontrolelementerne. Når du klikker på det aktiverede btnUndo-knap, gendannes kontrolelementets oprindelige værdi ved hjælp af egenskaben OldValue.

Sub UndoEdits()
    If Me.Dirty Then
        Me!btnUndo.Enabled = True    ' Enable button.
    Else
        Me!btnUndo.Enabled = False    ' Disable button.
    End If
End Sub
Sub btnUndo_Click()
    Dim ctlC As Control
        ' For each control.
        For Each ctlC in Me.Controls
            If ctlC.ControlType = acTextBox Then
                ' Restore Old Value.
                ctlC.Value = ctlC.OldValue
            End If
        Next ctlC
End Sub