(31/10/2018, 21:20)DataBilgi yazdı:

(31/10/2018, 18:31)ozanakkaya yazdı: Formun sağ tarafında bululan 9 adet metin kutusunun "İm" özelliğine "gizlenecek" yaz. Shift veya Ctrl tuşuna basarak çoklu seçim yapabilirsin.




"cmdFilter" isimli butonunun tıklandığında olayındaki kodun en üstüne (Private Sub cmdFilter_Click() kodunun hemen altına)

Dim kutu As Control

 

For Each kutu In Me



    If kutu.Tag = "gizlenecek" Then

    

        kutu.Visible = False

    

    End If



Next

kodu ekle,

Command90 isimli butonun tıklandığında olayındaki kodun en üstüne de

Dim kutu As Control

 

For Each kutu In Me



    If kutu.Tag = "gizlenecek" Then

    

        kutu.Visible = True

    

    End If



Next

Kodu ekle. Sonraki sorularında, konu başlığındaki sorudan farklı sorunuz var ise yeni konu açınız.

Tesekkur ederim. Benim Acess 2016 Ingilizce ve Ozellik bolumunde im adi altinda bir ozellik yok. En son Tag yani akilli etiketler var fakat im yok malesef.  Kodu aşağıdaki şekilde Command90 ve Private Sub cmdFilter_Click() altına ekledim. Fakat İM özelliğini bulamadım. Yardımcı olursanız sevinirim.  Saygılarımla

For Each TextBox In Me

    If TextBox.Tag = "invisible" Then
    
       TextBox.Visible = False

(01/11/2018, 11:47)DataBilgi yazdı:

(31/10/2018, 21:20)DataBilgi yazdı:

(31/10/2018, 18:31)ozanakkaya yazdı: Formun sağ tarafında bululan 9 adet metin kutusunun "İm" özelliğine "gizlenecek" yaz. Shift veya Ctrl tuşuna basarak çoklu seçim yapabilirsin.




"cmdFilter" isimli butonunun tıklandığında olayındaki kodun en üstüne (Private Sub cmdFilter_Click() kodunun hemen altına)

Dim kutu As Control

 

For Each kutu In Me



    If kutu.Tag = "gizlenecek" Then

    

        kutu.Visible = False

    

    End If



Next

kodu ekle,

Command90 isimli butonun tıklandığında olayındaki kodun en üstüne de

Dim kutu As Control

 

For Each kutu In Me



    If kutu.Tag = "gizlenecek" Then

    

        kutu.Visible = True

    

    End If



Next

Kodu ekle. Sonraki sorularında, konu başlığındaki sorudan farklı sorunuz var ise yeni konu açınız.

Tesekkur ederim. Benim Acess 2016 Ingilizce ve Ozellik bolumunde im adi altinda bir ozellik yok. En son Tag yani akilli etiketler var fakat im yok malesef.  Kodu aşağıdaki şekilde Command90 ve Private Sub cmdFilter_Click() altına ekledim. Fakat İM özelliğini bulamadım. Yardımcı olursanız sevinirim.  Saygılarımla

For Each TextBox In Me

    If TextBox.Tag = "invisible" Then
    
       TextBox.Visible = False
End if

Next

Tag özelliğine yazacaksınız.

(01/11/2018, 12:08)ozanakkaya yazdı: Tag özelliğine yazacaksınız.

Tag özelliğine 'invisible' yazdım ama işe yaramadı

sayın databilgi 
sağ taraftaki görünmesini istemediğiniz kısımları toplu olarak seçip tag kısmına "gizlenecek" -yada artık siz ne isterseniz onu yazacaksınız-
sonrada sayın ozan Akkaya'nın söylediği kodları ekleyeceksiniz.
eğer tag açıklamasına "gizlenecek" dışında bir şey yazdıysanız kodu yazarken de 
kutu.Tag = "gizlenecek" yerine 
kutu.Tag = "ne yazdıysanız" onu yazacaksınz
dosya aşağıdadır.

Sayın DataBilgi, tavsiyem
https://accesstr.net/konu-1-access-in-te...acmak.html bağlantısından başlayıp tüm videoları izleyin.