Sayın Kadir bey,
Dosyanın Access olduğundan eminmisiniz?,bende yine açılmadı

Alıntı:Dosyanın Access olduğundan eminmisiniz

siz ısrarla yanlışı neden bende arıyorsunuz. şimdi tekrar indirdim. sonuç yukarıda.

Sayın Kadır bey,
Öyle bişey demedim,ben sizde neden yanlış arayayımki bende açılmıyor  Ofıs versıyonundan olabilr belki ondandır.
Emek ve mesaınız için teşk.
Saygılarımla.

 sn: fascioğlu bildiğiniz üzere uzun zamandır formumuzun üyesisiniz. Formumuza kattığınız değerler adına (182 konu - 895 mesaj) teşekkür etmekle birlikte, www.accesstr.net ailesi bir çok sorunuzu yanıtlamış bulunmakta, sizinde anlayış ile karşılayacağınızı bilerek bu mesajı yazıyorum. nesnel programlamada nesne ne olursa olsun ister altf form ister buton, isten metin kutusu belirtildiğinde  visible=false bu gizler visible=true bu gösterir. bunu bu kadar soru sormanızın içinde illaki geçmiştir konu, veya forumda aratsanız pat diye önünüze çıkacak. sorunuzun cevabı (ister bir ister 5 ister 1000 tane form gizleyip saklayabilirsiniz) 

me.altform1.visible =false

me.altform2.visible =false

me.altform3.visible =false

bu üstekinler alt formu gizler. istediğiniz kadar bu şekilde çoğaltabilirsiniz.

me.altform1.visible =true

me.altform2.visible =true

me.altform3.visible =true

Sayın Özgür hocam
Affınıza sığınarak lütfen bunu yanlış anlamayın,Elbette False,truetüm formlarımda var amaçlarının ne olduğunuda biliyorum benim demek istediğim birden fazla formu veya alt formu "TEK BUTON" nasıl gizleyip gösterebilirim.Sıkıntım burada.
Saygılarımla.

en basit yöntem ile, form üzerinde bir Sonuc adında metin kutusu oluşturursunuz. varsayılan değerine 1 yazarsınız. form açıldığında Sonuc yazan metin kutusu değeri 1 olur. sonra Alttaki kodları tıklandığı olayına yazarsınız.

if me. sonuc= 1 then 

me.sonuc=2 'metin kutusuna 2 değeri atar 



me.altform.visible = flase 'alt formu gizler

me.butonadi.caption= "Alt Formları Göster"

else

me.sonuc=1 ' metin kutusuna 1 değeri atar 

me.altform.visible =true ' alt formu açar

me.butonadi.caption="Alt Formları Gizle

end if

bu işlemleri yaparsanız. istediğiniz gerçekleşir.