merhaba arkadaşlar
benım yaptiğim sistemde ürün çeşidinde kullanma klavuzunu,etiket,garanti var bundanlardan diğerini sectiğimde sadece o ekrani getirmek ve diğerlerini göstermemek istiyorum örnek
5050505 kodlu garanti garantiyi seçtiğimde onun özelliklerini görmek istiyorum onlari değiştirmem lazim bunu yapmam için bir yol yordam varsa bana sölermisiniz cok denedim yapamadım eğer yapabilirseniz cok memnun olurum dosya ektedir.
Ben formunuzda bir tane alan için örnek yaptım. Pratikte bu şekilde kullanmıyoruz elbette ancak fikir almanız açısından işinizi görecektir.
Gizlemek istediğiniz alan için o alanın Visible özelliğini False yapmanız yeterli olacaktır. Örnek :
URUNANAÇEŞİT.Visible = False
arkadaşim benim burada istediğim verileri çekme değil orada ürün çeşidi var 3 adette seçenek var bunlarin biriniden seçinice örnek "garaniti" seçince garanti tablosunu gösterecek ve sadece oraya kayit yapcak benim yapamadiğim bu
Yukarıda ilk mesajınızda ve hatta şimdiki mesjınızda dahi ayrıntı vermiyorsunuz. Hangi formda, hangi kontrolde, ne zaman, ne yapılınca ne olması gerektiğini örneklendirerek anlatmazsanız doğru cevabı bulmanız geciktikçe gecikecektir.
Diğer bir konu lütfen kelimeleri olması gerektiği gibi yazarsanız çok memnun kalırız.
özür dilerim şimdi detaylı açıklıyorum
Form' da URUNANAAGAC tablosunda üretim şekli var onu combobox ta eğer garanti seçili ise GARANTİTABLO1 kayit yapacak eğer etiket ise ETİKETTABLO1 kayit yapacak eğer kullanma klvz. ise KİTAPTABLO1 kayit yapacak ve orada diyelim etiketi seçtiğimizde sadece etiketin özellerini gireceğim çünkü burası ürün kayıt tarafı diğerlim garantiyi seçtim garantinin özellilerini yazacağım
3 altformun görünür özelliğini hayır olarak değiştir,
Açılan_Kutu25'in güncelleştirme sonrasında olayına aşağıdaki kodu ekle.
Private Sub Açılan_Kutu25_AfterUpdate()
Select Case Me.Açılan_Kutu25
Case "ETİKET"
Me.ETİKETTABLO1_alt_formu.Visible = True
Me.GARANTİTABLO1_alt_formu.Visible = False
Me.KİTAPTABLO1_alt_formu.Visible = False
Case "GARANTİ"
Me.ETİKETTABLO1_alt_formu.Visible = False
Me.GARANTİTABLO1_alt_formu.Visible = True
Me.KİTAPTABLO1_alt_formu.Visible = False
Case "KULLANMA KLV."
Me.ETİKETTABLO1_alt_formu.Visible = False
Me.GARANTİTABLO1_alt_formu.Visible = False
Me.KİTAPTABLO1_alt_formu.Visible = True
End Select
End Sub