Make your own free website on Tripod.com
Volver a Ejercicios - parte 3 Ir al Índice Ir a Estructuras de Control - parte II
Todos los lenguajes de programación tienen herramientas que permiten controlar el flujo de un programa
repitiendo fragmentos de código o tomando decisiones.

ESTRUCTURAS DE CONTROL
If condición then
------------------------------ Si la condicion se cumple entonces
If

Case
Decisión
else (opcional)
Si la condición no se cumple
For next

While - Wend
--------------------
Ciclos
End If
La estructura IF se utiliza para realizar distintas sentencias en base a una condición. Las condiciones deben ser elementos a evaluar cuyo resultado puede ser Verdadero o Falso.
Para las condiciones se utilizan los símbolos de comparación:
Condiciones:

7 = 2 + 5 ------------>Verdadero
2 = 3 ----------------->Falso
5 >2 ------------------>Verdadero
5>= 3 ---------------->Verdadero
3 < 3 ----------------->Falso
5<=3------------------>Falso
10<>10--------------->Falso
=
>
>=
<
<=
<>
Igual
Mayor
Mayor o igual
Menor
Menor o igual
Diferente

En las Estructuras de Control el orden de un programa está de acuerdo a ciertas condiciones, permitiendo que el mismo se desarrolle en forma no lineal y pudiendo tomar decisiones.
La estructura IF-Then-Else ejecutan las instrucciones en forma condicional :
If [(si) se cumple una condición] Then (entonces) habrá una determinada acción de lo contrario no habrá acción.
Hay 3 tipos de instrucciones If-Then:

*Estructura If-Then de línea única (la instrucción sólo podrá ejecutarse si es verdadera.)
Ejemplo:
If 4 > 5 Then
Print "A
"
Como en este caso se cumple la condición (es verdadera) aparecerá el caracter "A" Impreso.
Otro
If 5 < 4 Then
Print "A"

Como en este caso la condición No es verdadera, el caracter "A" no se imprimirá
*Estructura If-Then de varias líneas con un bloque de instrucción(c/u de las instrucciones del bloque se ejecturán si son verdaderas.) Cada Instrucción del bloque terminará en End-If
Ejemplo:
Private Sub N_Change()
If N.Text > 10 Then
MsgBox ("Error número mayor que 10")
End If
If N.Text < 0 Then
MsgBox ("Error número menor que 0")
End If
End Sub

*Estructura If-Then de varias líneas con varios bloques de instrucción (se puede ejecutar las instrucciones según las evaluaciones de la expresión original o según evaluaciones opcionales conocidas como Else y ElseIf.)
Ejemplo:
If 5 > 4 Then
Print "5"
Else
Print 4
End If
If 4 = 3 Then
Print "iguales"
ElseIf 4 > 3 Then
Print "4 mayor que 3"
ElseIf 4 < 3 Then

Print "4 menor que 3"
Else

Print "no puedo saber si 4 es igual, mayor o menor que 3"
End If
End Sub

En este ejemplo vemos que primero hay una condición original (5 mayor que 4), en caso de ser verdadera, se ejecutará esta condición (Imprimiendola) de lo comtrario se seguirá buscando la verdadera en el restro de las instrucciones. Al encontrar una instrucción verdadera esta se ejecuta y se sale de la estructura. Finalmente si ninguna de las instrucciones se cumplen llegamos a la instrucción Else, saliendo de la estructura.
En general esta estructura se usa poco reemplazándola por la estructura Select Case.

Ejercicio

Si ingresan 2 números en un formulario el 1ro. en un cuadro de texto (a) y el 2do. en otro cuadro de texto (b). Indicar en el cuadro de texto "Mayor"(mayor), el número más grande, y en el cuadro de texto "Menor"(menor) el número más chico.

Private Sub btnmostrar_Click()
If a.Text > b.Text Then
mayor.Text = a.Text
menor.Text = b.Text
Else
menor.Text = a.Text
mayor.Text = b.Text
End If
End Sub
Vamos a Estructuras de Control parte 2
Volver arriba Volver a Ejercicios - parte 3 Ir al Índice Ir a Estructuras de Control - parte II