Van toepassing op
Access voor Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Van toepassing op

Formulierobject

Rapportobject

U kunt de eigenschap Dirty gebruiken om te bepalen of de huidige record is gewijzigd sinds deze voor het laatst werd opgeslagen. U wilt bijvoorbeeld de gebruiker mogelijk vragen of wijzigingen in een record bedoeld waren en de gebruiker, als dat niet het geval is, toestaan om naar de volgende record te gaan zonder de wijzigingen op te slaan. Boolean lezen/schrijven.

expressie.Dirty

expressie Vereist. Een expressie die een van de objecten in de lijst Van toepassing op retourneert.

Opmerkingen

De eigenschap Dirty gebruikt de volgende instellingen.

Instelling

Visual Basic

Beschrijving

True

True

De huidige record is gewijzigd.

False

False

De huidige record is niet gewijzigd.

Deze eigenschap is beschikbaar in formulierweergave en gegevensbladweergave.

Deze eigenschap kan worden ingesteld of gelezen met een macro of een Visual Basic for Applications-code (VBA).

Wanneer een record wordt opgeslagen, stelt Access de eigenschap Dirty in op Onwaar. De eigenschap wordt ingesteld op True als een gebruiker een record wijzigt.

Voorbeeld

Het volgende voorbeeld schakelt de knop btnUndo in als gegevens worden gewijzigd. De subroutine UndoEdits( ) wordt vanuit de gebeurtenis AfterUpdate in de besturingselementen voor tekstvakken aangeroepen. Als op de ingeschakelde knop btnUndo wordt gedrukt, wordt de oorspronkelijke waarde van het besturingselement hersteld door de eigenschap OldValue te gebruiken.

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

Meer hulp nodig?

Meer opties?

Verken abonnementsvoordelen, blader door trainingscursussen, leer hoe u uw apparaat kunt beveiligen en meer.