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.