mrb arkadaslar yaptığım bi formda alt forum açmak istiyorum fakat bunun otomatik olmasını istiyorum. yani formda açılır kutudan örn: 1 'i tıklayınca bi alt forum açılsın 2'yi tıklayınca diğer alt forum açılsın ? mümkünmüdür
Sayın burak2444;
Bu söylediğiniz tabiki mümkündür. Siz
Site Kuralları na uygun olarak örnek ekleyin yardımcı olalım.
Kolay gelsin.
Birkaç yöntemle yapabilirsiniz
1. 2 altformu ana form üstüste yerleştirirsiniz visible true/false kullanırsınız
2. önce 2 sekmesi olan bir sekme grubu koyarsınız formları ayrı ayrı sekmelere
yerleştirsiniz, seçime göre ilgili sekmeyi aktif edersiniz
3. Form üzerine tek bir subform eklersiniz. seçimizden sonra "SourceObject" özelliğiyle
bu subformun içini doldurursunuz
Kod 1
If me.acilankutu= 1 then
me.subform1.visible=True
me. subform2.visible False
Else
me.subform2.visible=True
me. subform1.visible False
End If
Kod 2 sekmelerin adı ( sekme1, sekme2 olsun )
If me.acilankutu= 1 then
me.sekme1.SetFocus
Else
me.sekme2.SetFocus
End If
(bu tercihte formların manüel olarak da görüntülenme
şansı vardır ( sekme özelliği veya sekme butonları) ,
ama istemezseniz sekme stilini " hiçbiri" olarak ayarlayın )
Kod3
If me.acilankutu= 1 then
me.subform.SourceObject="subform1"
Else
me.subform.SourceObject="subform2"
End If
Kolay gelsin
______
Moderatörümüzün uyarısını sonradan gördüm, gerekeni yaparsanız sevinirim
abi dediğini yapmaya çalıstım fakat olmadı formu ekledim ordan bakabilirseniz sevinirim.
formda musterı formu içerisinde yapılacak işlem açılan kutusunda 1 ve 2 bulunmakta 1 i seçtiğimde kıra alt formunun açılmasını 2 yı seçtiğimde satıs alt formunun açılmasını istiyorum ama olmadı
Sayın burak2444 ;
Ekteki örneği inceleyiniz.
Kolay gelsin.
Kod
Private Sub YAPTIGI_ISLEM_AfterUpdate()
If Me.YAPTIGI_ISLEM = 1 Then
Me.KIRA.SourceObject = "kIRA"
Else
Me.KIRA.SourceObject = "SATIS"
End If
End Sub
If me.acilankutu= 1 then
me.subform.SourceObject="subform1" 'Subform forumunuzdaki subformun nesne adıdır.
Else
me.subform.SourceObject="subform2"
End If
Burada ifade edilen subform formunuza eklemiş olduğunuz subformun adıdır.
Dosyanızın yeni hali ektedir
Ben belirtmediğiniz için kendi
tercihimi kullandım (SourceObject seçeneği )
Ancak sizin 2 formunuzun tasarımları ayni
sadece isimleri farklı, sanırım birinin içeriğini
düzeltmeniz gerek
Kolay gelsin