ê DECISIÓN IF... THEN
Las estructuras de decisión If…Then te permiten evaluar una condición (expresión lógica) en el programa y llevar a cabo una serie de acciones basándose en el resultado de dicha evaluación. Es decir con la sentencia If, un programa puede tomar dos caminos: uno si se cumple la condición y otro si no se cumple
Su sintaxis es la siguiente:
Su sintaxis es la siguiente:
Ø If condición then sentencia
Ejemplo:
Ø If edad >=18 then label1.caption = “Mayor de edad”.
Si la variable edad es mayor o igual a 18, entonces Visual Basic asignará a la propiedad caption del objeto label1 el valor “Mayor de edad”. Si el valor de la variable edad no es mayor o igual a 18, Visual Basic ignorará la sentencia de asignación.
Visual Basic también permite ejecutar acciones alternativas cuando no se cumplen la condición, por ejemplo:
If edad >= 18 then
label1.caption = “Mayor de edad”
Else
label1.caption = “Menor de edad”
End If
En el ejemplo anterior las líneas de código, después de la cláusula Else, solamente se ejecutan cuando no se cumple con la primera condición.
Visual Basic al igual nos permite usar un If dentro de otro. Observa el siguiente ejemplo:
If hora < 12 then
label1.caption = “Buenos Días”
Else
If hora < 19 then
Iabel1.caption = “Buenas Tardes”
Else
label1.caption = “Buenas Noches”
End If
End If
ê MSG BOX
En Windows constantemente aparecen ventanas o cajas con mensajes. Las cajas de mensajes pueden incluir uno o más botones. MsgBox es la instrucción de Visual Basic para deplegar estas cajas.
La forma más sencilla de usar el MsgBox es por medio de la instrucción:
MsgBox ( “ mensaje ” )
ê ESTRUCTURA DE DECISIÓN SELECT CASE
La sentencia Select Case es una forma de tomar decisiones que se utiliza cuando se pueden tomar múltiples caminos. Tiene la siguiente sintaxis:
Select Case variable
Case valor1
Ejecutar esta acción cuando la variable sea igual al valor1
Case valor2
Ejecutar esta acción cuando la variable sea igual al valor2
Case valor3
Ejecutar esta acción cuando la variable sea igual al valor3
Etc…
End Select
Veamos el siguiente ejemplo:
Select Case hora
Case hora < 12
label1.caption = “Buenos Días”
Case hora 12 to 18
label1.caption = “Buenas Tardes”
Case hora > 19
label1.caption= “Buenas Noches”
End Select

No hay comentarios:
Publicar un comentario