Árvore de páginas

O Comando WHILE...ENDDO

Abrangência

Versão 5.07

Versão 5.08

Versão 6.09

Versão 7.10

Versão 8.11

Versões Anteriores


A estrutura de controle WHILE...ENDDO, ou simplesmente o loop WHILE, repete uma seção de código enquanto uma determinada expressão resultar em verdadeiro (.T.).

Sintaxe




WHILE lExpressao

Comandos...

[EXIT]

[LOOP]

ENDDO



Parâmetros



lExpressaoEspecifica uma expressão lógica cujo valor determina quando os comandos entre o WHILE e o ENDDO são executados. Enquanto o resultado de lExpressao for avaliado como verdadeiro (.T.), o conjunto de comandos são executados.
ComandosEspecifica um ou mais instruções de comando AdvPl que serão executadas enquanto lExpressao for avaliado como verdadeiro (.T.).
EXITTransfere o controle de dentro do comando WHILE...ENDDO para o comando imediatamente seguinte ao ENDDO, ou seja, finaliza a repetição da seção de comandos imediatamente. Pode-se colocar o comando EXIT em qualquer lugar entre o WHILE e o ENDO.
LOOPRetorna o controle diretamente para a cláusula WHILE sem executar o restante dos comandos entre o LOOP e o ENDDO. A expressão em lExpressao é reavaliada para a decisão se os comandos continuarão sendo executados.


Comentários



Os comandos entre o WHILE e o ENDDO são executados enquanto o resultado da avaliação da expressão em lExpressao permanecer verdadeiro (.T.). Cada palavra chave WHILE deve ter uma palavra chave ENDDO correspondente.

Exemplo




Local nNumber := 0
Local nSomaPar := 0

While nNumber <= 100

nSomaPar += nNumber
nNumber += 2

Enddo

Alert( "A soma dos 100 primeiros números pares é: " + cValToChar(nSomaPar) )

Return





  • Sem rótulos