CU00326A Bucles for next step do while loop loop while Visual Basic ejemplo

aprenderaprogramar.com

Bucles For Next Step, Do While
Loop, Do Loop While (Estructuras
de repetición en Visual Basic)
(CU00326A)
Sección: Cursos
Categoría: Curso Visual Basic Nivel I
Fecha revisión: 2029
Autor: Mario R. Rancel
Resumen: Entrega nº25 del Curso Visual Basic Nivel I

29

© 2006-2029 aprenderaprogramar.com

Bucles For Next Step, Do While Loop, Do Loop While en Visual Basic.ESTRUCTURAS DE REPETICIÓN (BUCLES) CON VISUAL BASIC
Vamos a ver cómo materializar con Visual Basic estructuras de repetición que permitirán que en
nuestros programas se realice un proceso n veces. En concreto veremos las instrucciones Desde …
Siguiente (For … Next) con su cláusula Paso (Step), la instrucción Mientras … Hacer (Do While … Loop)
y la instrucción Hacer … Repetir Mientras (Do … Loop While).Muchas veces podremos optar
indistintamente por usar una instrucción u otra. En otros casos, es recomendable decantarse por una
de ellas por hacer el programa más legible o sencillo que usando otras opciones.

INSTRUCCIÓN DESDE ... SIGUIENTE (FOR ... NEXT) Y CLÁUSULA PASO (STEP)
La sintaxis a emplear con Visual Basic es la siguiente:
For VAR = Vi To Vf
Instrucción 1
Instrucción 2
·
·
·
Instrucciónn
Next VAR
El incremento que sufre el contador es, por defecto, unitario. Es decir, el primer valor que toma VAR
en el bucle será Vi, el segundo Vi + 1, el tercero (Vi + 1) + 1, etc. La modificación de dicho valor de
incremento la realizaremos a través de la cláusula Step después del valor Vf. Step 2 implicará que en
cada repetición del bucle el contador se incremente en dos unidades, Step 5implicará que en cada
repetición del bucle el contador se incremente en cinco unidades. Un paso negativo del tipo Step -1
supone que el contador decrece en vez de incrementarse. Si el paso es negativo, Vi necesariamente
habrá de ser mayor que Vf, ya que en caso contrario no se producirá la entrada en el bucle.
Con este código se nos muestra en pantalla 3 veces hola (se ha invertido el sentido delbucle):
Código (versiones menos recientes VB):
Rem Curso Visual Basic aprenderaprogramar.com
Option Explicit
Dim VAR As Integer
Dim Vi As Integer
Dim Vf As Integer
Private Sub Form_Load()
Vi = 1
Vf = 3
For VAR = Vf To Vi Step –1
'[También supondría tres repeticiones For
VAR = Vi to Vf]
MsgBox ("hola")
Next VAR
End Sub
© 2006-2029 aprenderaprogramar.com

Código (versiones más recientes VB):
REM CursoVisual Basic aprenderaprogramar.com
Option Explicit On
Public Class Form1
Private Sub Form1_Load(ByVal sender As
System.Object, ByVal e As System.EventArgs)
Handles MyBase.Load
Dim VAR As Integer
Dim Vi As Integer
Dim Vf As Integer
Vi = 1
Vf = 3
For VAR = Vf To Vi Step -1
'[También supondría tres repeticiones
For VAR = Vi to Vf]
MsgBox("hola")
Next VAR
End Sub
End Class

Bucles For Next Step, DoWhile Loop, Do Loop While en Visual Basic.

Con Visual Basic resulta admisible usar Next sin indicar la variable que está sirviendo de guía del
bucle, pues todo bucle ha de tener un cierre. Sin embargo, no lo creemos recomendable pues puede
dificultar la lectura y depuración de los programas.
La instrucción For ... Next es anidable dentro de sí misma o dentro de otros tipos de bucles o
estructuras,debiendo seguir las pautas que ya hemos comentado.

EJERCICIO
Transformar en código el siguiente planteamiento: queremos generar un programa que pida un
número del 1 al 10 y nos muestre la “tabla de multiplicar” correspondiente.

SOLUCIÓN
Hemos realizado la pregunta relativa al número cuya tabla se desea conocer utilizando un InputBox.
Igualmente válido hubiera sido hacerlo con un Label contenedorde la pregunta y un TextBox donde
el usuario introduce la información. La tabla la mostramos sobre un Label denominado LabelTabla.

Código (versiones menos recientes VB):

Código (versiones más recientes VB):

Rem Curso Visual Basic aprenderaprogramar.com
Option Explicit
Dim T As Integer
Dim i As Integer

REM Curso Visual Basic aprenderaprogramar.com
Option Explicit On
Public Class Form1
Dim T...