0% encontró este documento útil (0 votos)
164 vistas2 páginas

Aplicación 2-2

La aplicación 'W_EDAD' permite calcular la edad de una persona a partir de su nombre y año de nacimiento, indicando si es mayor o menor de edad. Utiliza controles como StaticText y SingleLineEdit, y proporciona mensajes sobre la edad y el tiempo transcurrido desde que alcanzó la mayoría de edad. El script incluye la lógica para calcular la edad y mostrar la información correspondiente al usuario.

Cargado por

vidaro
Derechos de autor
© Attribution Non-Commercial (BY-NC)
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como DOCX, PDF, TXT o lee en línea desde Scribd
0% encontró este documento útil (0 votos)
164 vistas2 páginas

Aplicación 2-2

La aplicación 'W_EDAD' permite calcular la edad de una persona a partir de su nombre y año de nacimiento, indicando si es mayor o menor de edad. Utiliza controles como StaticText y SingleLineEdit, y proporciona mensajes sobre la edad y el tiempo transcurrido desde que alcanzó la mayoría de edad. El script incluye la lógica para calcular la edad y mostrar la información correspondiente al usuario.

Cargado por

vidaro
Derechos de autor
© Attribution Non-Commercial (BY-NC)
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como DOCX, PDF, TXT o lee en línea desde Scribd

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ú

También podría gustarte