Attiecas uz
Objekts Form |
Objekts Report |
Varat izmantot rekvizītu Dirty, lai noteiktu, vai pašreizējais ieraksts ir modificēts kopš pēdējās saglabāšanas reizes. Piemēram, varat jautāt lietotājam, vai izmaiņas ierakstā bija paredzētas un, ja nebija, atļaut lietotājam pāriet uz nākamo ierakstu, nesaglabājot izmaiņas. Lasāma/rakstāma Būla izteiksme.
izteiksme.Dirty
expression Obligāti. Izteiksme, kas atgriež vienu no objektiem sarakstā Attiecas uz.
Piezīmes
Rekvizīts Dirty izmanto tālāk norādītos iestatījumus.
Iestatījums |
Visual Basic |
Apraksts |
True |
True |
Pašreizējais ieraksts ir mainīts. |
False |
False |
Pašreizējais ieraksts nav mainīts. |
Šis rekvizīts ir pieejams Formas skats un Datu lapas skats.
Šo rekvizītu var iestatīt vai lasīt, izmantojot makro vai Visual Basic for Applications (VBA) kodu.
Kad ieraksts ir saglabāts, Microsoft Office Access 2007 iestata rekvizītam Dirty vērtību False. Kad lietotājs veic izmaiņas ierakstā, rekvizīts tiek iestatīts kā True.
Piemērs
Šajā piemērā iespējota poga btnUndo, kad tiek mainīti dati. Apakšrutīna UndoEdits( ) tiek izsaukta no tekstlodziņa vadīklu notikuma AfterUpdate. Noklikšķiniet uz iespējotās pogas btnUndo, lai atjaunotu sākotnējo vadīklas vērtību, izmantojot rekvizītu 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