Se aplică la
Obiectul Form |
---|
Obiectul Report |
Puteți utiliza proprietatea Dirty pentru a determina dacă înregistrarea curentă a fost modificată de la ultima salvare. De exemplu, poate doriți să întrebați utilizatorul dacă modificările unei înregistrări au fost intenționate și, dacă nu, să-i permiteți utilizatorului să treacă la următoarea înregistrare fără a salva modificările. Boolean în citire/scriere.
expresie.Dirty
expresie Obligatoriu. O expresie care returnează unul dintre obiectele din lista Se aplică la.
Observații
Proprietatea Dirty utilizează următoarele setări.
Setare |
Visual Basic |
Descriere |
---|---|---|
True |
True |
Înregistrarea curentă a fost modificată. |
False |
False |
Înregistrarea curentă nu a fost modificată. |
Această proprietate este disponibilă în Vizualizare formular și vizualizare Foaie de date.
Această proprietate este setată sau citită utilizând o macrocomandă sau cod Visual Basic for Applications (VBA).
Atunci când o înregistrare este salvată, Access setează proprietatea Dirty la False. Atunci când un utilizator aduce modificări unei înregistrări, proprietatea este setată la True.
Exemplu
Următorul exemplu activează butonul btnUndo atunci când se modifică datele. Subrutina UndoEdits( ) este apelată din evenimentul AfterUpdate din controalele casetei text. Un clic pe butonul btnUndo activat restaurează valoarea inițială a controlului utilizând proprietatea 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