Skip to main content

AccessTr.neT


Compile Error

Compile Error

Çözüldü #1
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

Cevapla
#2
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.
Cevapla
#3
(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.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task