Skip to main content

AccessTr.neT


Seçime Göre Alt Form Gösterme / Gizleme

Seçime Göre Alt Form Gösterme / Gizleme

Çözüldü #1
Ekteki uygulamada Talepler formunun içerisine alt formları ekledim ve açılışta olayına gizlenmesi kodunu yazdım. çünkü form açıldığında görünmesini istemiyorum.

Kod
Private Sub Form_Open(Cancel As Integer)
Me.satinalma.Visible = False
Me.fatura_islemleri.Visible = False

End Sub

ardından Birim adlı açılır kutudaki seçime göre açılmasını istedim. bunun içinde şöyle bir kod kullandım.

End Sub


Kod
Private Sub birim_AfterUpdate()
Me.talep_birimi.Requery

If Me.birim.Value = "Satın Alma" Then Me.satinalma.Visible = True
If Me.birim.Value = "Muhasebe" Then Me.fatura_islemleri.Visible = True

End Sub


fakat hiç bir şekilde görünmesini sağlayamadım. hatayı nerede yaptım? yardımcı olabilir misiniz.
.zip Database4.zip (Dosya Boyutu: 165,19 KB | İndirme Sayısı: 4)
derzulya, proud to be a member of AccessTr.neT since 09-03-2009.
Son Düzenleme: 10/03/2020, 16:06, Düzenleyen: derzulya.
Cevapla
#2
çalışmamasının sebebi açılır kutu ilk sütunla (0. sütun) ilişkili ama karşılaştırma 2. sütunla (1. sütun) yapılıyor dolayısıyla sonuç hatalı çıkıyor. kodu aşağıdaki gibi düzenlemeniz daha doğru olur
Visual Basic Code
If Me.birim.Column(1) = "Satın Alma" Then Me.satinalma.Visible = True Else Me.satinalma.Visible = False
If Me.birim.Column(1) = "Muhasebe" Then Me.fatura_islemleri.Visible = True Else Me.fatura_islemleri.Visible = False
Cevapla
#3
Else Me.satinalma.Visible = False eklemezseniz bir defa göründükten sonra hep görünür kalır bir şekilde onu tekrar görünmez yapmanız gerek
Cevapla
#4
Teşekkür ederim.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da