IES “LEONARDO DA VINCI” -1- LP5: Power Builder
APLICACIÓN RESUELTA 3: EDAD
En la siguiente aplicación se ingresa Diseñar la siguiente ventana: (W_EDAD)
el nombre de una persona y el año
en que nació, la computadora debe
calcular y mostrar la edad de la
persona, una observación que
indique si es mayor o menor de
edad. Si es mayor de edad debe
mostrar hace cuantos es mayor de
edad y si es menor de edad, se
debe indicar cuántos años le faltan
para ser mayor de edad.
Se han utilizados se han utilizado
los siguientes controles: StaticText,
SingleLineEdit, EditMask y
PictureButtom.
Crear una carpeta: Aplicacion3,
luego crear el WorkSpace:
WS_APLICACION3 y Target
(Application): AP_APLICACION3
El Script es el siguiente:
AP_APLICACION3 OPEN: PB_NUEVO CLICKED:
open(w_edad) sle_nombre.text = ""
W_EDAD OPEN: em_año.text = ""
sle_nombre.setfocus() sle_edad.text = ""
PB_MOSTRAR CLICKED: sle_observa.text = ""
//Declaración de variables sle_mensaje.text = ""
integer a,e,f sle_nombre.setfocus()
//Asignación de valores a las variables
a = integer(em_año.text)
PB_SALIR CLICKED:
//Calcular la edad
integer n
e = year(today()) - a
n=messagebox("Confirme : ","Está seguro de
sle_edad.text = "Tienes " + string(e) + " Años"
salir",question!,yesno!)
//Evaluar la edad
if n=1 then halt
if e >=18 then
sle_observa.text = "Mayor de edad"
f = e - 18
sle_mensaje.text = "Es mayor de edad hace " + string(f)
+ " años" NOTA:
else
Today() : Permite obtener la fecha
sle_observa.text = "Menor de edad"
f = 18 - e
del sistema, es decir la
sle_mensaje.text = "Le faltan " + string(f) + " años para ser mayor fecha que tiene la
de edad"
computadora.
end if
Ing. Víctor Dávila Rodríguez [email protected] Trujillo -
Perú
IES “LEONARDO DA VINCI” -2- LP5: Power Builder
Year() : Permite obtener el año de una
fecha.
Ing. Víctor Dávila Rodríguez [email protected] Trujillo -
Perú