Sub elseIfDemo()
Dim myNumber As Integer
myNumber = 5
If myNumber = 0 Then
MsgBox "You entered zero."
ElseIf myNumber > 0 Then
MsgBox "You entered a positive number."
ElseIf myNumber < 0 Then
MsgBox "You entered a negative number."
End If
End Sub