ينطبق على
عنصر Form |
---|
عنصر Report |
يمكنك استخدام الخاصية Dirty لتحديد ما إذا كان تم تعديل السجل الحالي منذ أن تم حفظه آخر مرة. على سبيل المثال، قد ترغب في أن تسأل المستخدم ما إذا كانت التغييرات التي تم إجراؤها على سجل مقصودة، وإذا لم يكن الأمر كذلك، فاسمح للمستخدم بالانتقال إلى السجل التالي بدون حفظ التغييرات. Boolean قراءة/كتابة.
expression.Dirty
التعبير Required. هو تعبير يقوم بإرجاع أحد العناصر الموجودة في القائمة "ينطبق على".
ملاحظات
تستخدم الخاصية Dirty الإعدادات التالية.
الإعداد |
Visual Basic |
الوصف |
---|---|---|
True |
True |
تم تغيير السجل الحالي. |
False |
False |
لم يتم تغيير السجل الحالي. |
هذه الخاصية متوفرة في عرض النموذج وطريقة عرض ورقة البيانات.
يتم تعيين هذه الخاصية أو قراءتها باستخدام الماكرو أو التعليمات البرمجية لـ Visual Basic for Applications (VBA).
عند حفظ سجل، يقوم Access بتعيين الخاصية Dirty إلى False. عندما يقوم مستخدم بإجراء تغييرات على سجل، يتم تعيين الخاصية إلى True.
مثال
يقوم المثال التالي بتمكين زر btnUndo عند تغيير البيانات. يتم استدعاء الروتين الفرعي UndoEdits( ) من حدث AfterUpdate لعناصر تحكم مربع النص. يؤدي النقر فوق زر btnUndo الممكّن إلى استعادة القيمة الأصلية لعنصر التحكم باستخدام الخاصية 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