Loops

[fenix lima]

LOOPS
Um loop é um conjunto de instruções de programa que executam repetidamente.
Loops desempenham um importante papel nos programas porque você precisará às vezes repetir seções de um programa para processar múltiplos valores de dados.

Loop Do While
Do While funciona com expressões de comparações exatamente como uma instrução If.

Exemplo:
Do
Variavel = InputBox("Digite o seu nome ou Fim para sair.")
If Variavel <> "Fim" Then Print Apostilas
Loop While Variavel <> "Fim"

Loop Do Until
O loop Do Until executa o corpo do loop enquanto o teste comparativo for falso.

Exemplo:
Do
Variavel = InputBox("Digite o seu nome ou Fim para sair.")
If Variavel <> "Fim" Then Print Variavel
Loop Until Variavel <> "Fim"

Caso tenha notado no loop (Do While) basta digitar Fim na janela prompt e clicar no botão “OK” para entrar no programa enquanto no loop (Do Until) caso você digite Fim na janela prompt e clique no botão “OK” o laço continuará.

[~$N4P~]

tambem tem o FOR-NEXT !

[Black-Hat]

E tem o For-Each-Next que quase ninguém conhece e é bem útil as vezes. (não sei se existe essa estrutura de controle pro VB6...mas no VB.NET funciona).

Exemplo:

Dim vetor() as String = {"String1", "String2", "String3", "String4"}
Dim elemento as String

For Each elemento in vetor
     MsgBox(elemento)
Next