Why do we use "End If" statement?

Question

Why do we write `END IF` statement in this program? Without writing it, we can easily get our result. Is there any example through which you can explain me the use of `END IF` statement? I have tried this: INPUT X IF X>10 THEN PRINT "X IS GREATER THAN 10" ELSE PRINT "X IS NOT GREATER THAN 10" END then I am also getting expected result. The real code is: INPUT X IF X>10 THEN PRINT "X IS GREATER THAN 10" ELSE PRINT "X IS NOT GREATER THAN 10" END IF END >EXPECTED AND DESIRED FOR EXAMPLE: When `X=5` Then Output will be "X IS NOT GREATER THAN `10`".

Answer 1

There are two forms of IF THEN / ELSE. One that uses the END IF, and one that doesn't. The statement without the END IF is for the simplest of tests and actions.

With the simple version, everything happens in one line of code.

======================

Private Sub SimpleIfThen()

Dim Someone As String

Someone = "Michael"

If Someone = "Michael" Then MsgBox "Michael called." Else MsgBox "Someone else called."

End Sub

The complex version allows for more logical tests and more lines of code after each condition

======================

Private Sub AddToCallLog(ByVal TimeStamp As Date)

'Add to database code goes in this routine

End Sub

Private Sub DeleteFromCallLog(ByVal AngryCaller As String)

'Remove from database code goes in this routine

End Sub

Private Sub ComplexIfThen(ByVal Someone As String)

If Someone = "Michael" Then

MsgBox "Michael called."

Call AddToCallLog(Now())

ElseIf Somone = "Susan" Then

MsgBox "Susan called on behalf of Michael."

Call AddToCallLog(Now())

ElseIf Someone = "John" Then

MsgBox "John was upset he didn't get a call from Michael."

Call DeleteFromCallLog(Someone)

Else

MsgBox "Someone else called."

End If

End Sub