Rakenduskoht
Objekt Form |
Objekt Report |
Atribuudiga Dirty saate välja selgitada, kas praegust kirjet on pärast viimast salvestamist muudetud. Näiteks saate küsida kasutajalt, kas kirjet muudeti tahtlikult, ja vastasel juhul lubada teda liikuda järgmise kirjeni ilma muudatusi salvestamata. Kirjutatav/loetav kahendmuutuja.
avaldis.Dirty
avaldis Nõutav. Avaldis, mis tagastab loendi Rakenduskoht objekti.
Kommentaarid
Atribuut Dirty kasutab järgmisi sätteid.
Säte |
Visual Basic |
Kirjeldus |
True |
True |
Praegune kirje on muudetud. |
False |
False |
Praegust kirjet pole muudetud. |
See atribuut on saadaval vormivaates ja andmelehevaates.
Selle atribuudi saab määrata ja seda saab lugeda makro või Visual Basic for Applications (VBA) koodi abil.
Kirje salvestamisel määrab Microsoft Office Access 2007 atribuudi Dirty väärtuseks False. Kui kasutaja kirjet muudab, määratakse atribuudi väärtuseks True.
Näide.
Järgmises näites lubatakse andmete muutmisel nupp btnUndo. Alamfunktsioon UndoEdits() kutsutakse tekstivälja juhtelementide sündmuse AfterUpdate kaudu. Saadavaks muutunud nupu btnUndo klõpsamisel taastatakse atribuudi OldValue põhjal juhtelemendi algne väärtus.
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