Revision [21425]

This is an old revision of KeyPgIfthen made by fxm on 2016-04-29 03:08:29.

 

IF...THEN


Control flow statement for conditional branching

Syntax:
If expression Then [statement(s)] [Else [statement(s)]] [End If]
or
If expression Then : [statement(s)] [Else [statement(s)]] : End If
or
If expression Then
[statement(s)]
[ Elseif expression Then ]
[statement(s)]
[ Else ]
[statement(s)]
End If

Description:
If...Then is a way to make decisions. It is a mechanism to execute code only if a condition is true, and can provide alternative code to execute based on more conditions.

expression can be one of several forms:
  • a conditional expression, for example:
  • x = 5
  • multiple conditions separated by logical bit-wise operators, for example:
  • x >= 5 And x <= 10
  • multiple conditions separated by logical short-circuit operators, for example:
  • y <> 0 AndAlso x \ y = 1
    (in this case, "x \ y = 1" will only be evaluated if "y <> 0" is True)
  • any numerical expression, in which case a value of zero (0) represents False, and a non-zero value represents True

Both multi-line and single-line Ifs can be nested. In the latter case, the optional End Ifs can be useful to control where nested Ifs begin and end.

The multi-line syntax allows several Elseifs (but none after a Else) and tests can be nested (there must be in this case as many End Ifs as (else)Ifs).
If the condition of the If is not true, those of Elseifs blocks are tested in succession:
  • If either of these is true, the corresponding code is executed, then the program skips the following blocks to continue after the End If.
  • If none are true, the code following the Else (if exists) is executed alone.

In the -lang fb and -lang fblite dialects, colons (:) can be used instead of newlines to construct multi-line If blocks on a single line.

Examples:
'' Here is a simple "guess the number" game using if...then for a decision.

Dim As Integer num, guess

Randomize
num = Int(Rnd * 10) + 1 'Create a random number between 1 and 10...
               
Print "guess the number between 1 and 10"

Do 'Start a loop

    Input "Guess"; guess 'Input a number from the user

    If guess > 10 OrElse guess < 1 Then  'The user's guess is out of range
        Print "The number can't be greater then 10 or less than 1!"
    ElseIf guess > num Then  'The user's guess is too high
        Print "Too high"
    ElseIf guess < num Then  'The user's guess is too low
        Print "Too low"
    ElseIf guess = num Then  'The user guessed the right number!
        Print "Correct!"
        Exit Do   'Exit the loop
    End If

Loop 'Go back to the start of the loop


Dialect Differences:
Differences from QB:
See also:
Back to Control Flow
Valid XHTML :: Valid CSS: :: Powered by WikkaWiki



sf.net phatcode