Dirty Özelliği

Uygulandığı öğe

Geçerli kaydın son kaydedilmesinden bu yana değiştirilip değiştirilmediğini saptamak için Dirty özelliğini kullanabilirsiniz. Örneğin, kayıtta yapılan değişikliklerin bilerek yapılıp yapılmadığını kullanıcıya sormak ve bilerek yapılmamışsa kullanıcının değişiklikleri kaydetmeden bir sonraki kayda geçmesini sağlamak isteyebilirsiniz. Okuma/yazma Boole.

ifade.Dirty

ifade Gerekli. Uygulandığı Öğe listesindeki nesnelerden birini döndüren ifade.

Notlar

Dirty özelliği aşağıdaki ayarları kullanır.

Bu özellik Form görünümü ve Veri Sayfası görünümü içinde kullanılabilir.

Bu özellik, makro veya Visual Basic for Applications (VBA) kodu kullanılarak ayarlanabilir veya okunabilir.

Bir kayıt kaydedildiğinde, Access Dirty özelliğini False olarak ayarlar. Kullanıcı kayıtta değişiklikler yaptığında, özellik True olarak ayarlanır.

Örnek

Aşağıdaki örnekte, veriler değiştirildiğinde btnUndo düğmesi etkinleştirilir. Metin kutusu denetimlerinin AfterUpdate olayından UndoEdits( ) alt yordamı çağrılır. Etkinleştirilmiş olan btnUndo düğmesine tıklandığında, OldValue özelliği kullanılarak denetimin özgün değeri geri yüklenir.

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