Report.Dirty property (Access)

Utilisez la propriété Sales pour déterminer si l’enregistrement actif a été modifié depuis son dernier enregistrement. Boolean (en lecture/écriture).

Syntaxe

expression. Sales

expression Variable qui représente un objet Rapport .

Remarques

Par exemple, vous pouvez demander à l’utilisateur si des modifications ont été apportées à un enregistrement et, dans le cas contraire, l’autoriser à passer à l’enregistrement suivant sans enregistrer les modifications.

Lorsqu’un enregistrement est sauvegardé, Microsoft Access affecte à la propriété Dirty la valeur False. Lorsqu’un utilisateur modifie un enregistrement, la propriété prend la valeur 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. Le fait de choisir 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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.