Una breve discusión sobre la explicación de VB de las declaraciones de bucle Do...

1. Do[{ While | Loop condition>;]

& ltLoop body><. /p>

Bucle

En esta forma, primero se juzga la condición y, si se cumple la condición, se ejecuta el cuerpo del bucle.

Ejemplo: Private subform_Click()

Dim i es un número entero, la suma es un número entero

i=1

Hasta i>10

Suma=suma+i

i=i+1

Anillo

Imprimir "1+2+.. .+10= ";Suma

Conector final

2. Hacer

& lt toro>

Bucle [{ Mientras | Hasta } <Bucle condición>]

Este formulario consiste en ejecutar primero el cuerpo del bucle y luego determinar si la condición se cumple después de cada ejecución (es decir, el cuerpo del bucle se ejecuta al menos una vez).

Ejemplo: Private subform_Click()

Dim i es un número entero y la suma es un número entero

i=1

Hacer

Suma = suma + i

i=i+1

Recorrido hasta i & gt10

Imprimir "1+2+... +10=";Suma

Conector final