04/09/2010, 14:31
Alt Form Gizleme Gösterme (Bunu açıklayabilecek olan var mı?)
04/09/2010, 14:44
kadirdursun
active onay kutusunun güncelleştirme sonrasına aşağıdaki kod yazılmış
Kod:
Private Sub Active_AfterUpdate()
'After Update of checkbox
'Check if Active checkbox is selected
'then show or hide subform
If Me.Active = True Then
Me.sfrmPaymentsSubform.Visible = True
Else
Me.sfrmPaymentsSubform.Visible = False
End If
End Sub
04/09/2010, 14:46
Kur@l
Sayın iterlemez;
Bu bizim sitemizde de uygulanan bir yöntemdir.
Ve çok açık göstermiş kodda...
Bu bizim sitemizde de uygulanan bir yöntemdir.
Ve çok açık göstermiş kodda...
04/09/2010, 16:05
mehmetdemiral
Açıklayalım. Verdiğiniz formda bir de alt form var. Bu alt form varsayılan özellik olarak "gizli" durumda. Bunu yapmak için ya altfotmun özelliklerinden görünür bölümünü hayır yaparsınız ya da formun açıldığında olayına
kodunu yazabilirsiniz. Daha sonra olan olayları da şöyle anlatalım:
Böylece bu form üzerindeki onay işaretlendiğinde alt form görünür, işaret kaldırıldığında gizlenir.
Kod:
Me.sfrmPaymentsSubform.Visible = false
kodunu yazabilirsiniz. Daha sonra olan olayları da şöyle anlatalım:
Kod:
Private Sub Active_AfterUpdate()
(bu kod bu olayın Active isimli nesne için yapılacağını belirtiyor)
If Me.Active = True Then
(Eğer active isimli onay nesnemiz true (yani işaretli) ise)
Me.sfrmPaymentsSubform.Visible = True
(sfrmPaymentsSubform isimli altformun visible(görünürlük) özelliğini True(evet) yap)
Else
(Else, yani değilse)
Me.sfrmPaymentsSubform.Visible = False
(sfrmPaymentsSubform isimli altformun visible(görünürlük) özelliğini False(hayır) yap)
End If
(if olayını bitir)
End Sub
(Bu alt kodlamayı bitir)
Böylece bu form üzerindeki onay işaretlendiğinde alt form görünür, işaret kaldırıldığında gizlenir.
04/09/2010, 17:46
iterlemez
cevap verenlere teşekkür ederim
04/09/2010, 22:48
benremix
Açıklamlar için teşekkürler.
Sn iterlemez özel üye olarak aramıza tekrar hoşgeldiniz. Tebrikler...
Saygılar...
Sn iterlemez özel üye olarak aramıza tekrar hoşgeldiniz. Tebrikler...
Saygılar...