Do Loop

O que é ?

É uma estrutura caracterizada por efetuar um teste lógico no início ou no final do looping. O funcionamento dessa estrutura é controlado por decisão.

Detalhes Importantes da Estrutura

Efetuando o teste lógico no início não garante que a execução seja realizada uma vez, já quando o teste é efetuado no final obrigatoriamente será executado pelo menos uma vez.

• While: executará o looping enquanto a condição for verdadeira.
• Until: executará o looping até que a condição se torne verdadeira.

Observe as sintaxes distintas das estruturas abaixo onde:

• [condição] = É uma expressão que será avaliada a cada interação.
• [instruções] = Bloco de comandos que se executará a cada interação do looping.
• [Exit Do] = Instrução para finalizar o looping caso haja a necessidade.

Do While | Loop

Do While [condição]
  [instruções]
  [Exit Do]
Loop

Do Until | Loop

Do Until [condição]
  [instruções]
Loop

Do | Loop While

Do
  [instruções]
Loop While [condição]

Do | Loop Until

Do
  [instruções]
Loop Until [condição]

Exemplo

Para exemplificar a utilização desse tipo de estrutura de looping, será considerado como exemplo o programa de tabuada com Do ... Loop While.

Sub Tabuada()
'Declarando variáveis
Dim N As Integer
Dim I As Integer
Dim Res As Integer
'
'Inicializando variável
N = Cells(1, 2).Value
I = 1
'
Do
  'Efetuando o cálculo
  Res = N * I
  'Atribuindo resultados na planilha
  Cells(I, 1).Value = Res
  'Incrementando contador
  I = I + 1
Loop While (I <= 10)
'
End Sub