Office
Se connecter

Propriété Dirty

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

True

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
Développez vos compétences dans Office
Découvrez des formations
Accédez aux nouvelles fonctionnalités en avant-première
Rejoignez le programme Office Insider

Ces informations vous ont-elles été utiles ?

Nous vous remercions pour vos commentaires.

Merci pour vos commentaires. Il serait vraisemblablement utile pour vous de contacter l’un de nos agents du support Office.

×