Freigeben über

IF ... ENDIF-Befehl

  • Artikel

Ermöglicht die bedingte Ausführung einer Gruppe von Befehlen auf der Grundlage eines logischen Ausdrucks.

IF lExpression [THEN]
   Commands
[ELSE
   Commands]
ENDIF

Parameter

  • lExpression
    Gibt den logischen Ausdruck an, der ausgewertet wird. Wenn die Auswertung von lExpression den Wert Wahr (.T.) ergibt, werden alle Befehle nach IF oder THEN und vor ELSE oder ENDIF (je nachdem, was zuerst erreicht wird) ausgeführt.
    • Wenn lExpression gleich Falsch (.F.) ist und ELSE vorhanden ist, werden alle Befehle nach ELSE und vor ENDIF ausgeführt.
    • Wenn lExpression gleich Falsch (.F.) ist und ELSE nicht vorhanden ist, werden alle Befehle zwischen IF und ENDIF ignoriert. In diesem Fall wird die Programmausführung mit dem ersten Befehl nach ENDIF fortgesetzt.

Hinweise

Sie können innerhalb eines IF ... ENDIF-Blocks einen anderen, verschachtelten IF ... ENDIF-Block verwenden.

Kommentare, vor denen "&&" steht, können nach IF, ELSE und ENDIF in derselben Zeile verwendet werden. Diese Kommentare werden beim Kompilieren und Ausführen des Programms ignoriert.

Beispiel

CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'Data\testdata')
USE Customer     && Open customer table

GETEXPR 'Enter condition to locate ' TO gcTemp;
   TYPE 'L' DEFAULT 'COMPANY = ""'
LOCATE FOR &gcTemp  && Enter LOCATE expression
IF FOUND( )  && Was it found?
   DISPLAY  && If so, display the record
ELSE  && If not found
   ? 'Condition ' + gcTemp + ' was not found '   && Display a message
ENDIF
USE

Siehe auch

DO CASE ... ENDCASE | DO WHILE ... ENDDO | FOR EACH ... ENDFOR | FOR ... ENDFOR | IIF( ) | SCAN ... ENDSCAN