7.2.4. DO - LOOP UNTIL (CONTINUAÇÃO DO CAPÍTULO 7)

Pessoal!!! Mais uma atualização do nosso curso. Até a próxima!

7.2.4. DO - LOOP UNTIL

Chegamos à última formatação desta estrutura.

Como você viu, não há mistérios. Quando estiver desenvolvendo seus sistemas, não terá dificuldades para definir qual será a melhor formatação. O importante é compreender como os LAÇOS são executados

CÓDIGO PARA COPIAR

Sub DoLoopUntil()

Dim Finaliza As String


'Finaliza = "inicio"

'Simples! Algumas movimentações e pronto!!!
Do
Finaliza = InputBox("Digite a palavra FIM para finalizar o LOOP", "EXEMPLO DO WHILE - LOOP")

MsgBox "Você não digitou a palavra FIM! Prestenção sô!!!"

Loop Until Finaliza = "FIM"

End Sub


Para acessar o curso completo Clique aqui