SENTENCIA Do...Loop
Un Loop (bucle) repite la ejecución de un conjunto de sentencias mientras una condición dada sea cierta, o hasta que una condición dada sea cierta.
Yo la utilizo por ejemplo para pasar registro por registro toda una base de datos.
Ej.
Do Until Data1.Recordset.EOF
...
Loop
Lo que acabo de poner es un bucle (igual q con for.. next).
El bucle va desde Do (imagina el for) hasta Loop (imagina el next). Y el bucle se va a repetir hasta(Until) que llegue al final de la base de datos (Data1.Recordset.EOF)
Otro ej. sencillo:
Dim I as integer, suma as integer
I=1
Do While I <= 99 'bucle mientras I<=99
suma = suma+I
I=I+2
Loop
Print suma