IF Without End IF in VBA

see the code below.

IF Weight=0 Then CallFunction

IF Weight=100 Then
Heavy=True
Else 
Heavy= False
End If

How is the program working when I have not ended a if statement?