bahsettiğiniz talebinize yönelik olarak;
eklediğiniz örneği kendi adıma inceleme imkanım ve zamanın olmadı fakat ilk etapta bir cevap verebilmek üzere,ilgili formun GEÇERLİ OLDUĞUNDA olay yordamına aşağıdaki iki yöntemi içeren kod ifadelerini ekleyerek deneyebilirsiniz.
YÖNTEM 1
(Geçiş Durumu değerini,iki seçenekli olacağı düşüncesi ile SAYI veri türü olarak var sayılmak sureti ile)
Kod:
If Me.geçis_durumu_denetimi_adi = 1 Then
Me.yesil_ikon_denetim_adi.Visible = True
Me.kirmizi_ikon_denetim_adi.Visible = False
Else
Me.yesil_ikon_denetim_adi.Visible = False
Me.kirmizi_ikon_denetim_adi.Visible = True
End IfKod:
Me.Me.geçis_durumu_denetimi_adi.SetFocus
Select Case Me.Me.geçis_durumu_denetimi_adi.Text
Case 0
Me.yesil_ikon_denetim_adi.Visible = False
Me.kirmizi_ikon_denetim_adi.Visible = True
Case 1
Me.yesil_ikon_denetim_adi.Visible = True
Me.kirmizi_ikon_denetim_adi.Visible = False
End Select