Make your own free website on Tripod.com

 

Estructura de decisión

 

 

Los programas que has escrito hasta ahora muestran menús, objetos y cuadros de diálogo en la pantalla. El usuario escoge libremente el orden en que desea manipular estos objetos que aparecen en la pantalla. Esta forma de programas se conoce como programación orientada a suceso. Los programas se crean partiendo de un grupo de objetos que saben cómo responder cuando el usuario interactúa con ellos y, finalmente se procesan las entradas realizadas por el usuario mediante procedimientos de suceso asociados con dichos objetos. Estos bloques de código procesarán entradas, calcularán nuevos valores, mostrarán la salida y llevarán a cabo otras tareas.

 

En este capítulo se utilizarán estructuras de decisión para comparar variables, propiedades y valores y para saber cómo ejecutar una o más secuencias basándose en los resultados.

 

Expresiones condicionales

 

Las expresiones condicionales requieren respuestas del tipo Verdadero o Falso. Una expresión condicional forma parte de una sentencia de programa que realiza preguntas (tipo C o F) sobre una propiedad, una variable o algún otro tipo de datos en el código del programa.

 

La expresión condicional Precio < 150 dará como resultado Cierto (True) si la variable Precio tiene un valor menor de 150, y dará como resultado Falso (False) si la variable Precio tiene un valor mayor de 150.

 

Operador relacional

 

Significado

 

Expresión

 

Resultado

=

Igual a

Puntuacion =Label1.Caption

Verdadero si la propiedad  Caption del Label1 tiene el mismo valor que la variable Puntuacion

<>

Distinto que

10<>20

Verdadero

>

Mayor que

10>20

Falso

<

Menor que

Peso<40

Verdadero si el contenido de la variable Peso es menor de 30

>=

Mayor o igual que

Text.Text >= 3

Es Cierto si Text.Text es mayor o igual que 3

<=

Menor o igual que

Text.Text >= 10

Es Cierto si Text.Text es menor o igual que 10

 

If... Then

 

El If... Then tiene la siguiente sintaxis:

If condición Then sentencia

 

Donde condición es una expresión condicional y sentencia es una sentencia válida de VB:

 

If Marcador >= 20 Then Label1.Caption = “¡Ganamos!”

 

If Text1.Text = 0 Then Print “Cero”

 

Ejercicio: ¿Negativo, cero o positivo?

 

Para el desarrollo de esta aplicación, procede a ubicar los siguientes controles en el formulario:

1 caja de texto

2 botones de comando

Inicia un proyecto nuevo VB:

 

File/New Proyect/Estandar EXE.

 

Crea la siguiente interfaz:

 

 

Propiedades de los objetos

 

Una vez ubicados los controles, establece las propiedades según se indica:

 

Form1

 

Propiedad

Valor

 

Nombre

Form1

 

BorderStyle

3-Fixed Dialog

 

Caption

Form1

 

Font

Arial, Negrita, tamaño 10

 

Moveable

False

 

StartUpPosition

2-CenterScreen

 

Text1

 

 

Propiedad

Valor

 

Nombre

Text1

 

Caption

(Vacío)

 

Font

Arial, Negrita, tamaño 10

 

Text

(Vacío)

 

 

Command1

 

Propiedad

Valor

 

Nombre

CmdNegZerPos

 

Caption

¿Es negativo, cero o positivo?

 

Command2

 

Propiedad

Valor

 

Nombre

CmdExit

 

Caption

Salir

 

Escritura de código

Luego de establecer las propiedades para los controles, debes añadir código a la aplicación.

 

Código en el botón ¿Es negativo, cero o positivo?

Haz doble click sobre dicho botón e ingresa el siguiente código:

 

 

Código del cuadro de texto

 

Código en el botón Salir

 

A continuación haz doble click sobre el botón Salir y añade el siguiente código:

 

Guarda la aplicación.

Ejecútala. Entra números positivos, negativos y cero (-3, 0, 120, etc.) en el cuadro de texto, luego da un clic en el botón ¿Es negativo...? El programa imprimirá el mensaje correspondiente. Al entrar el segundo número se borra el dato entrado anteriormente.

 

 

If... Then... Else (If anidado)

 

La estructura If... Then... Else amplía significativamente la utilidad y legibilidad del códuigo. Tiene la siguiente sintaxis:

 

If condición1 Then

   sentencias ejecutadas si condición es verdadera

ElseIf condición2 Then

sentencias ejecutadas si condición es verdadera   .

ElseIf ....

   .

   .

Else

   sentencias ejecutadas si condición es verdadera End If

 

Guarda el programa anterior con otro nombre y modifica el código del comando ¿Es negativo...? por el siguiente:

 

 

 

 

Home | VB |