Fazendo um programa repetir ações: Um loop com loop for... Next

Nesta lição, você aprenderá a usar a instrução For...Next para repetir ações em seu programa e contar quantas vezes essas ações foram executadas.

Quando você escreve um programa, você frequentemente precisa repetir ações.Por exemplo, suponha que você esteja escrevendo um método que exibe uma série de números na tela.Você precisará repetir a linha de código que exibe os números quantas vezes forem necessárias.

O loop For...Next permite que você especifique um número e em seguida, repita o código contido dentro desse loop o número de vezes especificado.O exemplo a seguir mostra como um loop For...Next aparece no código.

Dim i As Integer = 0
For i = 1 To 10
  DisplayNumber(i)
Next

O loop For...Next começa com uma variável contadora, i.Essa é uma variável que usa o loop para contar o número de vezes que ele foi executado.A próxima linha (For i = 1 to 10) informa ao programa quantas vezes deve-se repetir o loop e os valores que i terá.

Quando o código entra no loop For...Next, ele começa com i contendo o primeiro valor (nesse caso 1).O programa, em seguida, executa as linhas de código entre a linha For e a linha Next, nesse caso, chamando o método DisplayNumber com um parâmetro de i (nesse caso também 1).

Quando a linha Next é alcançada, 1 é adicionada a i e a execução do programa vai de volta para a linha For novamente.Isso se repete até que o valor de i é maior do que o segundo número na For linha, no caso de 10. Quando isso ocorre, o programa continuará com qualquer código após a Next linha.

Tente-o!

Para usar a instrução For...Next

1. No menu File, escolha New Project.

2. Na caixa de diálogo Novo Projeto , no painel de Templates, clique em Windows Application .

3. Na caixa Name digite ForNexte clique em OK.

   Abre um novo projeto Windows Forms.

4. Da Toolbox, arraste um controle um TextBox e um controle Button para o formulário.

5. Clique duas vezes em Button para abrir o Editor de Código.

6. No manipulador de eventos Button1_Click, digite o código a seguir:

   Dim i As Integer = 0
   Dim NumberOfRepetitions As Integer = CInt(Textbox1.Text)
   For i = 1 To NumberOfRepetitions
     MsgBox("This line has been repeated " & i & " times")
   Next
   

7. Pressione F5 para executar a página.

8. Na caixa de texto, digite um número e clique no botão.

   Uma caixa de mensagem aparece quantas vezes você indicou na caixa de texto.

Próximas etapas

Neste tópico, você aprendeu como usar o loop For...Next para repetir o código um número de vezes especificado.Neste ponto, você pode ir para a próxima lição na série, Tornando um programa escolher entre duas possibilidades: Tarefas Tornando seu ações repetir do programa:, ou você pode explorar outro tipo de loop em Examinar mais detalhadamente: Usando do... While e do... Until... Until para repetir até uma condição é atendida.

Consulte também

Tarefas

Fazendo um computador item: Escrever seu primeiro procedimento

Conceitos

Estruturas de Decisão

Referência

For... Avançar instrução (@@)