Onursal Üye
Onursal Üye
Additional groups:Üye
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
okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Son Düzenleme: 06/11/2010, 14:30, Düzenleyen: okileturc.