sn firdevs hanım
Access soruları ve cevapları bölümüne konu açmanız gerekiyodu.
Dirty özelliğini kullanarak, son kaydetme tarihinden bu yana geçerli kayıt üzerinde değişiklik yapılıp yapılmadığını belirleyebilirsiniz. Örneğin, kullanıcıya, kayıttaki değişikliklerin istenen değişiklikler olup olmadığını sormak ve değilse, kullanıcının değişiklikleri kaydetmeden bir sonraki kayda geçmesine izin vermek isteyebilirsiniz. Okunur/yazılır Boolean.
ifade.Dirty
ifade Gerekli. Uygulama listesindeki nesnelerden birini döndüren bir ifade.
Açıklamalar
Dirty özelliği aşağıdaki ayarları kullanır.
Ayar Visual Basic Açıklaması
Doğru Doğru = Geçerli kayıt değiştirildi.
Yanlış Yanlış =Geçerli kayıt değiştirilmedi.
Bu özellik, Form görünümü (Form görünümü: Verileri göstermek veya kabul etmek için bir form görüntüleyen pencere. Form görünümü, tablolara veri eklemenin ve tablolardaki verileri değiştirmenin birincil aracıdır. Bu görünümde formun tasarımını da değiştirebilirsiniz.) ve Veri sayfası görünümü (Veri Sayfası görünümü: Tablodan, formdan, sorgudan, görünümden veya depolanmış yordamdan gelen verileri satır-sütun biçiminde görüntüleyen bir pencere. Veri Sayfası görünümünde, alanları düzenleyebilir, veri ekleyip silebilir ve veri arayabilirsiniz.)'nde kullanılabilir.
Bu özellik, bir makro (makro: Görevleri otomatikleştirmek için kullanabileceğiniz bir eylem veya eylem kümesi.) veya Visual Basic for Applications (VBA) (Visual Basic for Applications (VBA): Microsoft Windows tabanlı uygulamalar programlamak için kullanılan ve bazı Microsoft programlarıyla birlikte gelen makro dili sürümü.) kodu kullanılarak ayarlanır veya okunur.
Kayıt kaydedilirken, Microsoft Office
Access 2007 Dirty özelliğini Yanlış olarak ayarlar. Kullanıcı kayıtta değişiklikler yaptığında, özellik ayarı Doğru olur.
Örnek
Aşağıdaki örnek, veri değiştirildiğinde btnUndo düğmesini etkinleştirir. Metin kutusu denetimlerinin GüncelleştirmeSonrasında olayından UndoEdits( ) alt yordamı çağrılır. Etkinleştirilen btnUndo düğmesi tıklatıldığı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
sn seruz mesajınızı görmedim.
"Gülümsemenin, parasal değeri yoktur. Satın alınmaz, ödünç verilmez, dilenilmez, çalınmaz ama verilmedikçe hiç alınamaz."
Baştan sona Sql veritabanı oluşturma
#1
