Que es el Ciclo for en Visual Basic. Net

Estructura For

 La estructura repetitiva “For”  es uno de los bucles más usados en la programación. Su planteamiento es sencillo, y es ideal para usar en aquellas situaciones en la que conocemos la cantidad de veces que queremos que se repita nuestro bloque de instrucciones. Con el ciclo For,  repetimos una instrucción un número determinado de veces, hasta un punto que hemos estableció.


Su planteamiento es el siguiente:


Dim i As Integer = 0

For i = 0 To 10 Step 1

MsgBox("Variable Contadora = " & i)

Sentencia Next

Como podemos ver en la estructura “For”, utilizamos una variable contadora ” i “, que sera nuestra variable de control para nuestro Bucle; esta variable se encarga de ir aumentando su valor hasta llegar al valor final ” 10 ” y ahí finalizar nuestro Bucle, el valor a finalizar se establece mediante la sentencia “To” .

Siguiente a esto, (opcional) se especifica con “Step” la cantidad en la que se incrementa la variable “i” cada vez que se recorre nuestro Bucle.

Luego colocan las instrucciones que se ejecutarán en el momento en el que nuestro Bucle empiece a ejecutarse; en el caso del ejemplo, se mostrará un MsgBox indicando el valor de la variable contadora, en el cual se concatena la variable “i” para que esta muestre su valor en el mensaje.

Por último se cierra nuestro ciclo repetitivo con la sentencia “Next”. La variable "i"  se ha convertido en una variable universal del Ciclo For. se le asocia a esta estructura debido a la notación matemática "Sumatoria(Σ)", En la cual "i" representa el indice de la sumatoria, lo que significa: Punto a partir.



Ejemplo1: 

 Ejemplo2:

Ejemplo3:

Comentarios

Publicar un comentario

Entradas más populares de este blog

Ejemplo 1

Imagen
Eliminar Filas Según Criterio Basándose en el tema de la eliminación de columnas vacías, se adjunta en este artículo la forma de eliminar en un archivo según un criterio en específico, para ello es necesario emplear el código de la última fila.  Esta macro generalizada, solicita la columna del criterio y cuál es esté para poder facilitar al usuario su búsqueda. Empezando la macro se realiza una copia de la hoja actual para no modificar la base de datos, y así poder realizar los cambios requeridos. Esta función en primer lugar selecciona la hoja actual y luego la copia para tenerla lista a los cambios. HojaActual = ActiveSheet.Name Sheets(HojaActual).Select Sheets(HojaActual).Copy Before:=Sheets(1) Por otro lado, para el bucle de limpieza se utiliza el código de la última fila, recorriendo desde el fin al principio, así se podrá evitar problemas de que se acorte la tabla o existan saltos en ella. A continuación, a través de la variable qColumna,  se solic...
Leer más

Ejemplo 2

Generar números primos en Excel A veces nos preguntamos  ¿Cómo sacar los números primos en Excel? ,  o si  ¿Existe una fórmula para sacar los números primos? , en nuestro artículo Números Primos mostramos en que consisten estos números, y colocamos algunos ejemplos de números primos previamente generados, en este artículo mostraremos como generar los números primos. Descargue el siguiente archivo Generar números primos en excel,  el cual contiene el programa mostrado a continuación, para poder emplearlo solo debe indicar el número límite hasta el cual realizar la generación de números primos. Sub numeroprimo() Application.ScreenUpdating = False 'Cells(1, 1) = 1 Cells(2, 1) = 2 celda = 3 numero = InputBox("ingrese un número entre 3 y 10000") If numero >= 3 And numero < 10000 Then For x = 3 To numero Step 2 cantidad = 0 For y = 2 To (x - 1) Z = x Mod y If Z = 0 Then cantidad = cantidad + 1 Exit For E...
Leer más

Ejemplo3

Ordenador por número de hijos con For Next Ordenando, esn este caso permite ordenar una base de datos según el número de hijos, la aplicación, empieza con dos for next en los que se invierte el orden de los valores asignados a "x" e "y". La aplicación emplea el "If" para comparar el número de hijos, almacenando los datos en una variable temporal que dejará de funcionar al acabar la aplicación. En este caso, la aplicación funciona para 12 filas y 6 columnas, pero sería facil cambiar los códigos para abarcar una mayor cantidad de datos y para trabajar con condiciones distintas. Esta función puede tener uso en el campo de la investigación de mercados y el análisis de base de datos en general. Sub pregunta4d() Range("F1").Select ActiveCell.FormulaR1C1 = "=COUNTA(C[1])" Range("F1").Select For x = 2 To Cells(1, 6) – 1 For y = x + 1 To Cells(1, 6) If Cells(x, 11) > Cells(y, 11) Then For columna = 7 To 12 tempor...
Leer más