25/03/2020, 13:29
25/03/2020, 17:09
bir modüle ekleyeceğiniz aşağıdaki fonksiyon işinize yarayabilir
herhangi bir forma tüm nesneleri ekleyip fonksiyonu çağırırsınız
kapalı formu açıp tek tek nesneleri alıyor
herhangi bir forma tüm nesneleri ekleyip fonksiyonu çağırırsınız
kapalı formu açıp tek tek nesneleri alıyor
Function OzellikVarMi(frmAdi As String)
DoCmd.OpenForm "form1", acDesign
Dim frm As Form
Dim Nesne As Control
Dim Ozellk As Property
Set frm = Forms(frmAdi).Form
For Each Nesne In frm.Controls
x = 0
For Each Ozellk In Nesne.Properties
If Ozellk.Name = "Enabled" Then x = 1
Next Ozellk
If x = 0 Then Debug.Print Nesne.Name, "bu nesnenin 'enabled' özelliği yok"
Next Nesne
DoCmd.Close acForm, frm.Name
End Function
fonksiyonu çağırmak içinOzellikVarMi "FormAdi"
25/03/2020, 19:44
Dim Ozellk As Property
Bunu hiç duymamştım çok teşekkürler
Bunu hiç duymamştım çok teşekkürler
26/03/2020, 01:18
Yanlış konu anlama 
Mesajı sildim önceden yazdığım.

Mesajı sildim önceden yazdığım.