Otra manera de crear un bucle (repetición), es con la sentencia For... Next. Con esto podemos crear un bucle repitiendo
varias operaciones. Para hacer esto, se elige una variable que acturá como contador de las vueltas del bucle. Cuando alcanze
un valor determinado, finalizará el bucle. Primero se iguala la variable que cuenta las vueltas al número que deseamos
comenzar (For i=0). Por defecto, la variable que cuenta las vueltas del bucle se incrementa en 1, pero se puede asiganr
otro valor de incremento. Este valor se pone despues de la palabra Step.
Escribí un ejemplo de bucle For... Next, donde me calcula el cuadrado de la variable que está contando las vueltas. Es así:
<% 'Definimos la variable contador.
dim cuen 'Le decimos al bucle que la variable cuen empieza en 0, y que debe finalizar el bucle cuando sea igual a 10. 'Con Step indicamos que se debe sumar solo 1 por ciclo.
For cuen = 0 To 10 Step 1 'Mandamos un mensaje, que calcula el cuadrado de la variable.
response.write cuen*cuen &" es el cuadrado de "& cuen &"<BR>" 'Ponemos un condicional IF, que cuando se cumpla muestre un mensaje.
if (cuen=10) then
response.write "Ha terminado el bucle..."
end if 'Volvemos al For, siempre y cuando la variable cuen no haya llegado a 10.
Next
%>
A continuación se muestra el bucle trabajando. Notar que el Step es de 1... se puede elegir cualquier incremento.
0 es el cuadrado de 0 1 es el cuadrado de 1 4 es el cuadrado de 2 9 es el cuadrado de 3 16 es el cuadrado de 4 25 es el cuadrado de 5 36 es el cuadrado de 6 49 es el cuadrado de 7 64 es el cuadrado de 8 81 es el cuadrado de 9 100 es el cuadrado de 10 Ha terminado el bucle...
