Fecha: Febrero 14 de 2014
Asignatura: Tecnología e Informática.
Formación en Valor: Justicia.
Núcleo Integrador: Programación Orientada a Objetos.
Condicionales.
Objetivo: Utilizar los condicionales para Visual Basic.
Condicionales: Se
utilizan para evaluar una o más condiciones y retorna un valor de verdad (verdadero
o Falso) y permitir ejecutar diferentes
instrucciones.
Visual Basic utiliza diferentes condicionales, entre los que
encontramos el condicional IF.
Evaluar solo la parte verdadera
Sintaxis1:
Sintaxis1:
IF Condición THEN
SI ES VERDADERO SE
EJECUTAN N INSTRUCCIONES.
ENDIF
Evaluar la parte verdadera y la parte falsa
Sintaxis2:
IF Condición THEN
SI ES VERDADERO SE
EJECUTAN N INSTRUCCIONES.
ELSE
SI ES FALSO SE EJECUTAN N INSTRUCCIONES.
ENDIF
Evaluar la parte diferentes condiciones que pueden ser verdaderas o falsas
Sintaxis3:
IF Condición THEN
SI ES VERDADERO SE
EJECUTAN N INSTRUCCIONES.
ELSE IF Condición THEN
SI ES VERDADERO SE
EJECUTAN N INSTRUCCIONES.
ELSE
SI ES FALSO SE EJECUTAN N INSTRUCCIONES.
ENDIF
Nota1: un IF puede tener diferentes ELSEIF, los que sean necesarios.
Nota2: un IF puede tener un solo ELSE (el ELSE es opcional)
Nota3: Siempre finaliza en ENDIF
TALLER: Diseñe el siguiente formulario
Presione doble Clic sobre el botón de comando MAYOR.Escriba el siguiente código:
Private Sub Command1_Click()
Dim N1 As Integer, N2 As Integer, N3 As Integer
N1 = InputBox("Ingresa Primer Numero")
N2 = InputBox("Ingresa Segundo Numero")
N3 = InputBox("Ingresa Tercer Numero")
If N1 > N2 And N1 > N3 Then
MAYOR = N1
ElseIf N2 > N1 And N2 > N3 Then
MAYOR = N2
ElseIf N3 > N1 And N3 > N2 Then
MAYOR = N3
Else
MsgBox "SON IGUALES"
Exit Sub
End If
MsgBox "EL NUMERO MAYOR ES " + Str(MAYOR)
End Sub
Presione F5 y de CLIC sobre el botón MAYOR
EJERCICIO 1:
Desarrolle un programa que capture la edad de una persona y muestre un mensaje que indique si es un bebe, un niño, adolescente o es un adulto.
Tenga en cuenta:
un Bebe es de 0 a 3 años.
un Niño es de 4 a 12 años.
un Adolescente es de 13 a 17 años.
un Adulto es de 18 años en adelante.

No hay comentarios:
Publicar un comentario