TextBox.Dirty-Ereignis (Access)

Das Dirty-Ereignis tritt auf, wenn sich der Inhalt des angegebenen Steuerelements ändert.

Syntax

Ausdruck. Dirty (Abbrechen)

Ausdruck Eine Variable, die ein TextBox-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Abbrechen	Erforderlich	Integer	Diese Einstellung bestimmt, ob das Dirty-Ereignis eintritt. Wenn Sie das Cancel-Argument auf True (1) festlegen, wird das Dirty-Ereignis abgebrochen.

HinwBemerkungeneise

Beispiele für dieses Ereignis sind die direkte Eingabe eines Zeichens in das Textfeld oder Kombinationsfeld oder das Ändern der Text-Eigenschaftseinstellung des Steuerelements mithilfe eines Makros oder Visual Basics.

Das Ändern eines Datensatzes in einem Formular unter Verwendung eines Makros oder mit Visual Basic löst dieses Ereignis nicht aus. Sie müssen die Daten direkt in den Datensatz eingeben oder die Text-Eigenschaft des Steuerelements festlegen.

Dieses Ereignis betrifft nur gebundene Formulare, nicht ein ungebundenes Formular oder einen Bericht.

Um ein Makro oder eine Ereignisprozedur auszuführen, wenn dieses Ereignis auftritt, legen Sie die OnDirty-Eigenschaft auf den Namen des Makros oder auf [Ereignisprozedur] fest.

Durch Ausführen eines Makros oder einer Ereignisprozedur, wenn ein Dirty-Ereignis auftritt, können Sie bestimmen, ob der Datensatz geändert werden kann. Außerdem können Sie eine Meldung anzeigen und nach der Berechtigung zum Bearbeiten fragen.

Wenn Sie die Daten in einem Datensatz mithilfe der Tastatur ändern, treten zusätzlich zu Steuerungsereignissen wie dem Dirty-Ereignis Tastaturereignisse auf. For example, if you move to a new record and type an ANSI character in a text box in the record, the following events occur in this order:

KeyDown → KeyPress → BeforeInsert → Dirty → KeyUp

Die BeforeUpdate- und AfterUpdate-Ereignisse für einen Datensatz treten auf, nachdem Sie die neuen oder geänderten Daten in den Datensatz eingegeben und zu einem anderen Datensatz wechseln (oder im Menü Datensätze die Option Datensatz speichern auswählen), und daher nach dem Dirty-Ereignis für den Datensatz.

Das Abbrechen des Dirty-Ereignisses führt dazu, dass für die Änderungen am aktuellen Datensatz ein Rollback ausgeführt wird. Dies entspricht dem Drücken der ESC-TASTE.

Beispiel

Im folgenden Beispiel wird die BtnUndo-Schaltfläche aktiviert, wenn Daten geändert werden. Die UndoEdits( ) -Unterroutine wird über das Dirty-Ereignis von Textfeld-Steuerelementen aufgerufen. Durch Klicken auf die aktivierte btnUndo-Schaltfläche wird der ursprüngliche Wert des Steuerelements mithilfe der OldValue-Eigenschaft wiederhergestellt.

Private Sub Form_Dirty() 
 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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.