variávelNuméricoObrigatório
Variável ou elemento de array usado como contador. Prefira declará-lo explicitamente como Local.
COMANDOPublicado
FOR ... NEXT
FOR <variável> := <inicial> TO <final> [STEP <incremento>] ... NEXTRepete um bloco de comandos uma quantidade determinada de vezes, usando uma variável como contador.
Visão geral
A estrutura FOR ... NEXT executa repetidamente os comandos delimitados por FOR e NEXT. O contador começa no valor inicial, avança pelo STEP informado — ou por 1 quando a cláusula é omitida — e termina quando ultrapassa o limite final. STEP negativo permite percorrer valores em ordem decrescente. EXIT encerra o laço e LOOP passa diretamente para a próxima iteração.
Sintaxe
FOR <variável> := <inicial> TO <final> [STEP <incremento>] ... NEXTParâmetros
inicialNuméricoObrigatório
Valor inicial do contador, avaliado quando o laço é iniciado.
finalNuméricoObrigatório
Limite final do contador, avaliado quando o laço é iniciado.
incrementoNuméricoOpcional
Valor somado ao contador em cada iteração. Pode ser negativo e sua expressão é reavaliada a cada passagem.
Padrão:1Percurso crescente com STEP
User Function ExForPares()
Local nNumero
Local nSoma := 0
For nNumero := 0 To 100 Step 2
nSoma += nNumero
Next
MsgInfo("Soma dos pares: " + CValToChar(nSoma))
ReturnResultado esperado
O contador começa em zero e avança de dois em dois. Ao final, nSoma contém a soma dos números pares entre 0 e 100.
Percurso decrescente
User Function ExContagem()
Local nContador
For nContador := 5 To 1 Step -1
ConOut("Contagem: " + CValToChar(nContador))
Next
ReturnResultado esperado
STEP -1 reduz o contador a cada iteração, produzindo os valores 5, 4, 3, 2 e 1.
Controle com LOOP e EXIT
User Function ExControle()
Local nItem
For nItem := 1 To 20
If nItem % 2 != 0
Loop
EndIf
If nItem > 10
Exit
EndIf
ConOut(CValToChar(nItem))
Next
ReturnResultado esperado
Os valores ímpares são ignorados por LOOP. EXIT encerra o processamento quando o primeiro número par maior que 10 é alcançado.
- Declare o contador como Local antes do FOR para deixar seu escopo explícito.
- Use STEP negativo quando o valor inicial for maior que o final.
- Use EXIT quando uma condição permitir encerrar a busca antes do limite.
- Use LOOP para ignorar o restante do bloco e continuar na próxima iteração.
- Mantenha o corpo do laço curto ou extraia regras extensas para funções auxiliares.
- Alterar as variáveis usadas como limites inicial ou final dentro do laço não recalcula os limites já considerados no início.
- Alterar diretamente a variável contadora modifica a progressão e pode mudar a quantidade de iterações.
- Um STEP incompatível com a direção esperada pode impedir que o bloco seja executado ou produzir comportamento incorreto.
- Se o contador não existir, a documentação informa que ele pode ser criado implicitamente como Private; isso dificulta identificar erros de digitação e dependências de escopo.