Endcase

Do Case

Команда выбора (Do Case)

Endif

Команда проверки условия (If)

Команды управления

If <ВырL>

[<команды>]

[Else

<команды>]

Если условие истинно, то выполняются все ко­ман­ды, следующие за If до Else или до Endif, если команда Else не указана. Если условие лож­но и не указана команда Else, все коман­ды между If и Endif игнори­ру­ются. Если условие ложно и указана команда Else, то выполняются все команды между Else и Endif. Допускается вложение команд If.

Внимание! В FoxPro отсутствует команда безусловной передачи управления типа Goto и нет понятия метки команды.

Case <ВырL1>

<команды>

...

[Case <ВырLN>

<команды>]

[Otherwise

<команды>]

Это команда обеспечивает выбор одной последовательности команд из набора возможных альтернатив.

Фраза Case <ВырL> устанавливает условное выражение для последующей оценки его истинности. Если выражение оценено как ложное, то все последующие команды до следующей команды Case будут пропущены и не выполняются. Когда условие истинно (.Т.), выпол­няют­ся все последующие команды до появления одной из команд Case, Otherwise или Endcase.

После выполнения всех команд первой фразы Case, для которой ус­ло­вие истинно, остальные фразы Case пропускаются, и система пе­ре­хо­дит на первую команду, следующую за Endcase.

Если все фразы Case ложны и не указана фраза Otherwise, то не вы­полняется никаких команд, и система переходит на первую команду, сле­дующую за фразой Endcase.

Фраза Otherwise определяет выполнение альтернативной пос­ле­довательности команд, когда все фразы Case ложны.

Пример формирования знака числа значения переменной X в Sign.

Do Case

Case X>0

Sign=1 && положительное значение переменной X

Case X=0

Sign=0 && нулевое значение переменной X

Otherwise

Sign=-1 && отрицательное значение переменной X

Endcase

Дата добавления: 2014-12-10