AccessTr.neT
formda kutuları toplu gizleme - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: formda kutuları toplu gizleme (/konu-formda-kutulari-toplu-gizleme.html)



formda kutuları toplu gizleme - mhmtogz - 19/09/2013

merhabalar. öncelikle aramalarda bulduklarımı uygulayamadığım için yazma gereği duydum. formumda liste ve dolması gereken kutular var..
istediğim form açıldığında sadece liste,yeni Kayıt ve düzenle buttonlarının görünmesi.
yeni kayıt seçtğiminde üstteki kutular ile kaydet,sil ve vazgeç buttonları açılacak yeni kayıt, düzenle buttonları . görünmeyecek. yardımlarınız bekliyorum.


Cvp: formda kutuları toplu gizleme - metehan16 - 20/09/2013

Sayın meslektaşım kısa zamanda fikir vermesi açısından örneğiniz üzerinden bişeyler yaptım. inceleyerek bunu daha geliştirebilirsiniz.


Cvp: formda kutuları toplu gizleme - mhmtogz - 20/09/2013

eyvallah dosutm sağolasın.


Cvp: formda kutuları toplu gizleme - aydın3838 - 21/09/2013

selam
fikir vermesi açısından başka ve kısa bir yaklaşımda benden

kodun çalışması için
kodun içindeki txtkontrol cümlesini form elemanlarının özelliklerindeki (im) yada diğer adı ile (tag) olan kısma yazın

Public Sub textlerikilitle()
Dim Ctlr As Control
On Error Resume Next
For Each Ctlr In Form.Controls
If Ctlr.Tag = "txtkontrol" Then
Ctlr.visible= True
End If
Next
End Sub

Public Sub textleriac()
Dim Ctlr As Control
On Error Resume Next
For Each Ctlr In Form.Controls
If Ctlr.Tag = "txtkontrol" Then
Ctlr.visible = False
End If
Next
End Sub