Codificación de ciclos mediante instrucciones Do Loop en Visual Basic .NET

A continuación se muestra el pseudocódigo, diagrama de flujo y código correspondiente a un bucle Do sencillo. La instrucción Dim no forma parte del ciclo; sólo está allí para su información.

REALIZA_CICLO

{IntContador es la variable entera}
.
.
.
Inicializar condición

Hacer mientras (condición) Instrucciones
Fin Ciclo
.

Do While (condición)
‘Instrucciones a realizar
Loop

Veamos un ejemplo de código:

Dim IntContador, Total as Integer

IntContador=0
Do While Total<100
Total =IntContador^2 IntContador=IntContador + 1
‘ Otras instrucciones a procesar
Loop

Si el valor de InsContador comenzara en cero, este ciclo se ejecutará 11 veces (observe que el valor de IntContador aumenta en una unidad en cada pasada del ciclo). Si el valor de IntContador fuera inicialmente de 11, las instrucciones contenidas entre Do y Loop nunca se ejecutarían.

Si se desea que el bucle se ejecute al menos una vez, con independencia de cuál sea el valor de partida de IntContador, deberá codificar la condición en la instrucción Loop. Veamos un ejemplo.

REALIZA_CICLO

{IntContador es la variable entera}
.
.
.
Inicializar condición Hacer

Instrucciones Mientras (condición)

Do
‘Instrucciones a ejecutar
Loop While (condición)

Veamos un ejemplo de código:

Do

Total = IntContador^2 IntContador = IntContador + 1 ‘ Instrucciones a procesar
Loop While Total < 100.