Saygı değer Üstadlarım Ekteki VT de form Üzerinde "ÜCRETLİMİ(ÜCRETLİ) Açılan kutudaki değer Listesinden( 2 alan var "Hayır","Evet") "Hayır" değeri seçilnce

2."GELİR TÜRÜ" Açılan Kutudaki (Satır Kaynak Türü-Değer Listesi) ' nden ("SGK";"Maaş/Gelir";"Faiz/Kira/Gelir";"Yakını";"2022 Aylığı";"Huzurevi Harçlığı";"Diğer";"Yok")
"Yok" değerini getirsin

"ÜCRETLİMİ(ÜCRETLİ) Açılan kutudaki değer Listesinden "Evet"   seçilince ("SGK";"Maaş/Gelir";"Faiz/Kira/Gelir";"Yakını";"2022 Aylığı";"Huzurevi Harçlığı";"Diğer") değerleri getirsin istiyorum "Yok" değeri olmayacak

Sitemizde yaptığım araştırmalarda Tablo ve Sorgu ile bu konuda çok belgeye rastladım ancak  (Satır Kaynak Türü-Değer Listesi) konusunda yararlanacağım bir örnek bulamadım yada bu konuyu nasıl arayacağımı bilemedim.

Siz değerli üstadlarımdan bu konuda yardım bekliyorum.

Teşekkür Ederim.



  YAŞLI-ENGELLİ UYGULAMA.rar (Boyut: 313,98 KB / İndirilme: 95)

"GELİR_TÜRÜ" alanının "değer listesini devral" özelliğini hayır yapıp
"ÜCRETLİ" alanının değiştiğinde olayına aşağıdaki kodu yazıp dener misiniz?
iyi çalışmalar

(18-09-2019, 13:24)halily demiş ki: "GELİR_TÜRÜ" alanının "değer listesini devral" özelliğini hayır yapıp
"ÜCRETLİ" alanının değiştiğinde olayına aşağıdaki kodu yazıp dener misiniz?
iyi çalışmalar

Visual Basic

Private Sub ÜCRETLİ_AfterUpdate()
If Me.ÜCRETLİ.Value = "Hayır" Then Me.GELİR_TÜRÜ.RowSource = "YOK" Else Me.GELİR_TÜRÜ.RowSource = "SGK;Maaş/Gelir;Faiz/Kira/Gelir;Yakını;2022 Aylığı;Huzurevi Harçlığı;Diğer"
End Sub

Üstadım yine Hızır gibi yetiştin on numara oldu çok teşekkür ederim.