Visual Basic 6 – Capítulo 04 – Estructuras de control

Las estructuras de control son fundamentales en cualquier lenguaje de programación, incluido Visual Basic 6. Estas estructuras nos permiten controlar el flujo de ejecución de un programa, tomando decisiones y repitiendo tareas según condiciones específicas. En este capítulo, aprenderemos sobre las estructuras de control en Visual Basic 6, incluyendo la estructura IF, la estructura SELECT CASE y las estructuras de bucle FOR y WHILE.

Estructura IF

La estructura IF permite tomar decisiones en un programa. La sintaxis básica de la estructura IF en Visual Basic es la siguiente:

If condición Then
    ' Código que se ejecuta si la condición es verdadera
ElseIf otraCondición Then
    ' Código que se ejecuta si la otra condición es verdadera
Else
    ' Código que se ejecuta si ninguna de las condiciones anteriores es verdadera
End If

Ejemplo

Dim edad As Integer = 20

If edad > = 18 Then
    MsgBox("Eres mayor de edad.")
Else
    MsgBox("Eres menor de edad.")
End If

Estructura SELECT CASE

La estructura SELECT CASE es una forma más compacta de tomar decisiones múltiples en un programa. La sintaxis básica de la estructura SELECT CASE en Visual Basic 6 es la siguiente:

Select Case variable
    Case valor1
        ' Código que se ejecuta si la variable tiene el valor de valor1
    Case valor2
        ' Código que se ejecuta si la variable tiene el valor de valor2
    Case Else
        ' Código que se ejecuta si la variable no coincide con ningún valor anterior
End Select

Ejemplo

Dim diaSemana As Integer = 3

Select Case diaSemana
    Case 1
        MsgBox("Lunes")
    Case 2
        MsgBox("Martes")
    Case 3
        MsgBox("Miércoles")
    Case 4
        MsgBox("Jueves")
    Case 5
        MsgBox("Viernes")
    Case Else
        MsgBox("Fin de semana")
End Select

Estructuras de Bucle FOR y WHILE

Las estructuras de bucle FOR y WHILE permiten repetir una serie de instrucciones mientras se cumpla una condición. La sintaxis básica de estas estructuras en Visual Basic 6 es la siguiente:

Bucle FOR

For variable As tipoDeDato = valorInicial To valorFinal Step incremento
    ' Código que se ejecuta en cada iteración
Next

Bucle WHILE

While condición
    ' Código que se ejecuta mientras se cumpla la condición
End While

Ejemplo Bucle FOR

For i As Integer = 1 To 5 Step 1
    MsgBox("Iteración " & i)
Next

Ejemplo Bucle WHILE

Dim contador As Integer = 1

While contador < = 5
    MsgBox("Iteración " & contador)
    contador = contador + 1
End While

Ejercicios Resueltos

Ejercicio 1: Mostrar los números del 1 al 10 utilizando un bucle FOR y una caja de texto.

For i = 1 To 10 Step 1
    txtMensaje.Text = txtMensaje.Text & " " & i
Next

**Ejercicio 2**: Mostrar los números pares del 1 al 20 utilizando un bucle FOR y una caja de texto.

For i = 2 To 20 Step 2
    txtMensaje.Text = txtMensaje.Text & " " & i
Next

**Ejercicio 3**: Calcular la suma de los números del 1 al 100 utilizando un bucle FOR.

Dim suma As Integer = 0

For i = 1 To 100 Step 1
    suma = suma + i
Next

MsgBox("La suma de los números del 1 al 100 es: " & suma)

Conclusiones

En este capítulo, hemos aprendido sobre las estructuras de control en Visual Basic 6, incluyendo la estructura IF, la estructura SELECT CASE y las estructuras de bucle FOR y WHILE. Estas estructuras son fundamentales para tomar decisiones y repetir tareas en un programa. Hemos resuelto ejercicios prácticos para poner en práctica los conocimientos adquiridos.