AccessTr.neT
Compile Error - 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ığı: Compile Error (/konu-compile-error.html)



Compile Error - notrino - 11/09/2018

Aşağıdaki kodu yazdığımda "Block if without End if" hatası alıyorum. Bu nedir ve nasıl düzelir? Tşk.

Kod:
Private Sub Report_Load()
Dim FS As Integer
If Me.FS = 1 Then
Me.Kimlik.BackColor = RGB(255, 0, 0)
Else
If Me.FS = 2 Then
Me.Kimlik.BackColor = RGB(128, 255, 0)
End If
End Sub




Cvp: Compile Error - ozanakkaya - 11/09/2018

2 defa if kodu yazılmış ancak end if 1 defa yazılmış.
end if kodunun altına bir tane daha end if kodu yazmalısınız.


Cvp: Compile Error - notrino - 11/09/2018

(11/09/2018, 16:15)ozanakkaya yazdı: 2 defa if kodu yazılmış ancak end if 1 defa yazılmış.
end if kodunun altına bir tane daha end if kodu yazmalısınız.

Merhabalar,

Evet problem çözüldü. Tşk.