S’applique à
Objet Form |
Objet Report |
Vous pouvez utiliser la propriété Dirty pour déterminer si l’enregistrement actif a été modifié depuis sa dernière sauvegarde. Par exemple, vous pouvez demander à l’utilisateur si les modifications apportées à l’enregistrement étaient intentionnelles et, si ce n’est pas le cas, lui permettre d’accéder à l’enregistrement suivant sans sauvegarder les modifications. Booléen en lecture/écriture.
expression.Dirty
expression Obligatoire. Expression qui renvoie l’un des objets de la liste S’applique à.
Remarques
La propriété Dirty utilise les paramètres suivants.
Paramètre |
Visual Basic |
Description |
Vrai |
True |
L’enregistrement actif a été modifié. |
False |
False |
L’enregistrement actif n’a pas été modifié. |
Cette propriété est disponible en mode Formulaire et en mode Feuille de données.
Cette propriété est définie ou lue en utilisant une macro ou un code Visual Basic pour Applications (VBA).
Une fois l’enregistrement sauvegardé, Microsoft Office Access 2007 définit la propriété Dirty sur False. Lorsqu’un utilisateur apporte des modifications à un enregistrement, la propriété est définie sur True.
Exemple
L’exemple suivant active le bouton btnUndo lorsque des données sont modifiées. La sous-routine UndoEdits( ) est appelée à partir de l’événement AfterUpdate des contrôles de zone de texte. Un clic sur le bouton btnUndo activé restaure la valeur d’origine du contrôle à l’aide de la propriété 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