AccessTr.neT
End If witout Block If =? - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: End If witout Block If =? (/konu-end-if-witout-block-if.html)

Sayfalar: 1 2


End If witout Block If =? - prtkl - 10/08/2011

merhabalar,


If SEÇ_ELDEN.Enabled = True Then ELDEN_N_TARİF.Visible = True
End If
If SEÇ_ELDEN.Enabled = False Then ELDEN_N_TARİF.Visible = False
End If
End Sub

bu komut çalıştırıldığında

"compile error:"
"End If witout Block If"

hatası veriyor. Nasıl düzetebilirim?

not:
SEÇ_ELDEN = option box
ELDEN_N_TARİF = textbox

Kolay gelsin.


Cvp: End If witout Block If =? - alpeki99 - 10/08/2011


If SEÇ_ELDEN.Enabled = True Then
ELDEN_N_TARİF.Visible = True
Else
ELDEN_N_TARİF.Visible = False
End Sub

olacak şekilde değiştirin


Cvp: End If witout Block If =? - prtkl - 10/08/2011

teşekkürler,

değiştirdim ancak yine aynı hatayı verdi.


Cvp: End If witout Block If =? - nsahin - 10/08/2011


If SEÇ_ELDEN.Enabled = True Then
ELDEN_N_TARİF.Visible = True
Else
ELDEN_N_TARİF.Visible = False
End If
End Sub

olarak düzenleyiniz. alpeki99 hocam End If'i unutmuş. affına sığınıyorum


Cvp: End If witout Block If =? - prtkl - 10/08/2011

aklım durdu afedersiniz benim Access de mi bir problem var acaba bi bakar mısınz ekte gönderdim.


Cvp: End If witout Block If =? - nsahin - 10/08/2011

If optbox = -1 Then
textbox.Visible = False
Else
textbox.Visible = True
End If

olarak değiştirip denermisiniz?