Respuestas

¡La mejor respuesta!
2013-05-29T12:14:05+02:00
Option Explicit 'Declaración explícita de variables. Evita el uso de variables no definidas

Dim contador as integer 'Define la variable: contador


Private Sub Form_Load()

contador = 0 'Inicializa la variable: contador
Do While contador <=100 'Define la condición de fin de ciclo
contador = contador + 5 'Actualiza el contador
Loop

End Sub

dim i as integer
do while i <= 100
... i = i + 5
loopGeneral