A continuación te ofrecemos ejemplos de estructuras de diferentes bucles.
-Do While...Loop: seguir en el bucle mientras o hasta una condición se cumpla.
|
Dim Comprobar, Contador ' Creamos dos variables. Comprobar = True: Contador = 0 ' Inicializa su valor. Do ' Bucle externo. Do While Contador < 20 ' Bucle interno. Contador = Contador + 1 ' Incrementa el contador. If Contador = 10 Then ' Si la condición es verdadera. Comprobar = False ' Establece el valor a False. Exit Do ' Sale del bucle interno. End If Loop Loop Until Comprobar = False ' Sale inmediatamente del bucle externo. |
-For...Next: utilizar un contador para ejecutar las instrucciones un número determinado de veces.
|
For j = 0 To 10 ' Bucle controlado. Se repetirá 10 veces instrucciones Next j |
-For Each...Next: repetición del grupo de instrucciones para cada uno de los objetos de una colección.
|
For Each frm In Application.Forms If frm.Caption <> Screen.ActiveForm.Caption Then frm.Close Next |
-While... Wend: ejecuta una serie de instrucciones mientras una condición sea verdadera.
|
Dim Contador ' Creamos una variable. Contador = 0 ' Inicializa la variable con el valor 0 While Contador < 20 ' Comprueba el valor del Contador. Contador = Contador + 1 ' Incrementa Contador. Wend ' Finaliza el bucle End While cuando Contador > 19. Debug.Print Contador ' Imprime 20 en la ventana Depuración. |
Hay 198 opiniones. Opina sobre este curso.
| Cursos | Valoración | Alumnos | Vídeo | |
|---|---|---|---|---|
|
Restaurar fotografías con Photoshop Seguramente en alguna ocasión hemos tenido en nuestras manos alguna fotografía antigua en blanco y negro con algún tipo de deterioro por el paso del tiempo. En e... [26/01/05] |
|
54.931 | ||
|
Hacer una web con Joomla Hacer una web con Joomla. Joomla es un gestor de contenido, en el que puedes crear tu sitio Web de un modo sencillo y rápido. Este curso es... [06/08/09] |
|
2.102 | ||
|
Sistemas operativos Una breve reseña de lo que son los sistemas operativos, sus caracteristicas y las funciones que tienen, asi de como se clasifican dentro de todos los sistemas operativos ... [23/03/05] |
|
6.747 | ||
Publicar en
del.icio.us
digg
meneame