AccessTr.neT

Tam Versiyon: Form Açıldığında önceki formu auto kapatmak
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Syn Hocalarım;

bende bu accesse bulaştım ve hastalığı kaptım kendime göre bir veri tabanı yapıyorum formlarla destekli olarak çalışıyorum ancak visual basic bilgim fazla olmadığı için hazır kodlara bakaraktan gelişmeye çalışıyorum.Benım sorunum makrolarla tasarladığım menu. bir form açtığımda iki menu oluyor yanı altta kalan formu kapatamadığım için üstte kalan formda çift menu yerleşiyor. Bu sorunu nasıl aşacağım konusunda şimdiden bana yardımcı olacak siz kıymetli hocalarıma teşekkür ederim.

örneği eklemek istiyordum ancak iş yerinde çalıştığımdan dolayı kopyalama yapamadığım için buraya ekleyemedim bunun için özür dilerim.

dediğim gibi bir form açıkken başka bir form açıldığında öncekini auto kapatacak bir yöntem benım sıkıntımı çözecek teşekkür ederim tüm emeği geçenlere....
Sayın Hati09
Sorunuzu yanlış yerde sormuşsunuz...
Lütfen Forum Kuralarına dikkat ediniz...
Formun açıldığında olayına aşağıdaki kodu dene.
Kod:
DoCmd.Close acForm, "frm_form1"

frm_form1= Kapanması istenen form adı.
(21/04/2009, 19:23)Puletin yazdı: [ -> ]Sayın Hati09
Sorunuzu yanlış yerde sormuşsunuz...
Lütfen Forum Kuralarına dikkat ediniz...

Kesinlikle haklısınız kusura bakmayın forumda aktif olan sürem artıkça bu tip hatalar azalacaktır özür dilerim.
(21/04/2009, 19:25)sledgeab yazdı: [ -> ]Formun açıldığında olayına aşağıdaki kodu dene.
Kod:
DoCmd.Close acForm, "frm_form1"

frm_form1= Kapanması istenen form adı.

teşekkürler hocam deneyeceğim çalışırsa haber edeceğim sağolun....
peki hocam olası herhangi bir form açacağım bunu kombinasyon olarakmı yazmam lazım acaba? şimdi oraya bir form ismi tanımladım ama ben belki başka form açacağım bunu çoklu bir kombinasyona nasıl sokarım ilginize şimdiden teşekkürler.
Ne demek istediğinizi tam olarak anlayamadım ama butona tıklandığında bir formun açılıp diğerinin kapanması için aşağıdaki kodu kullanılabilir.
Kod:
DoCmd.Close acForm, "kapanacakformadı"
DoCmd.OpenForm "açılacakformadı", acNormal, "", "", , acNormal