As instruções a seguir executam loops.
Repete as instruções entre as instruções Do e Loop enquanto a condição for True ou até que a condição torne-se True.