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
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
Task