IF statement syntax question (1 Viewer)

[SurreyNick]

I'm interested to understand why the syntax of this very simple IF statement works in example A but not in example B. Even though both examples require only one resulting action Example B requires an End If block to work, whist Example A doesn't. The only difference is that in Example B the Debug.Print command is on a new line (absence of indenting is deliberate to illustrate the only difference is the carriage return). Could someone explain? Thank you.

Sub SimpleIFa()
'This code works without an End If block

    Dim Rating As Long
    Rating = 1
    
    If Rating = 0 Then Debug.Print "Rejected. Rating below minimum required"
    If Rating = 1 Then Debug.Print "Approved. Rating above minimum required"

End Sub

Sub SimpleIFb()
'This code will only work if an End If block is included

    Dim Rating As Long
    Rating = 1
    
    If Rating = 0 Then
    Debug.Print "Rejected. Rating below minimum required"
    If Rating = 1 Then
    Debug.Print "Approved. Rating above minimum required"

End Sub

 

[MajP]

You answered your own question. That is the way the compiler works. If you make it one line it will compile if not it looks for a block. Think about it. If not the compiler would have no idea which lines of code would go with the if statement. This would be super confusing for any error check if not.

 

[Ranman256]

Either, put the IF as a single statement on 1 line, NO ENDIF
IF TRUE THEN BEEP

or IF "block" IF then new lines with code, BUT must end block with END IF

IF TRUE THEN
'statement 1
'statement 2
END IF


IF TRUE THEN
'statement 1
ELSE
'statement 2
END IF


Your example can be done with CASE

SELECT CASE RATING
  case 0
     Debug.Print "Rejected. Rating below minimum required"
  case 1
      Debug.Print "Approved. Rating above minimum required"
END SELECT

 

[SurreyNick]

You answered your own question. That is the way the compiler works. If you make it one line it will compile if not it looks for a block. Think about it. If not the compiler would have no idea which lines of code would go with the if statement. This would be super confusing for any error check if not.

Ah. Yes, that makes sense. Thank you.
It's one thing to know what to do but another thing entirely to understanding why and I'm keen to learn the why.