(29/03/2017, 16:54)ozanakkaya yazdı: Merhaba, sürekli formda denetimdeki değere göre diğer denetimi gizleyemezsiniz. Yazılan kod ilk satırdaki veriye göre çalışır.
Yazdığınız koddaki hata ile ilgili olarak?
Private Sub secenek_1002_urun_yok_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If siparis_iptal_edildi = -1 Then
MsgBox " Bu ürünün siparişi iptal edildiği için seçim yapamazsınız.", vbCritical, "CUKLA YARDIM"
sube_1002_urun_var_yok.Value = False
End If
End Sub
Şeklindeki koddan mı bahsediyoruz?
Evet hocam bu kod "ÜRÜN YOK " seçeneği için ve sorunsuz çalışıyor.
____________________________________________________________________
Çalışmayan kod "ÜRÜN VAR" seçeneği ile bu ( seçenek işaretli ise kaldırıyor, işaretli değil ise işaretliyor ). Yani yukarıdaki gibi
çalışmıyor.
Kod:
' *SİPARİ İPTAL EDİLDİ* durumuna göre "VAR" alanının denetimi *
Private Sub secenek_1002_urun_var_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
If siparis_iptal_edildi = -1 Then
MsgBox " Bu ürünün siparişi iptal edildiği için seçim yapamazsınız.", vbCritical, "Asor Yardım"
sube_1002_urun_var_yok.Value = False
End If
End Sub