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
