Todoexpertos.com
http://www.todoexpertos.com
La respuesta está en Internet
Información de la pregunta
Título: ayuda en programas extension PRG de visual.
Experto: victoramf
Valoración: 5
Fecha: 12/05/2008

ayuda en programas extension PRG de visual.
Muy buenos dias expertos pues aqui molestandolos con el visual fox pro quisiera q me ayudaran a resolver los siguientes 3 problemas en extension prg: 1 .Elaborar un programa que le permita ingresar el nombre d un archivo con extension prg e indicar si este existe o no en el disco en uso. 2.Cree un programa que le permita ingresar una fecha y esta sea desplegada en letras. Ejemplo: 17/03/2001 = Marzo 17 del 2001. 3.elabore un programa para ingresar la fecha actual y la fecha de nacimiento de una persona, luego debe indicar la edad de la persona,tomando en cuenta que no debe de presentar decimales.

ayuda en programas extension PRG de visual.
Procedimientos escritos de manera muy simple: 1.- cArchivo = Space(20) @00,00 Get cArchivo Read @10,00 Say Iif( File( Alltrim(  cArchivo ) ), "Si", "No" ) + " Existe." 2.- dFecha = Date() @00,00 Get dFecha Read @10,00 Say cMonth( dFecha )  + " " + AllTrim( Str( Day( dFecha ) ) ) + " del " + AllTrim( Str( Year( dFecha ) ) ) + "." 3.- dNacimiento = Date() @00,00 Get dNacimiento Read @10,00 Say "Edad: " + AllTrim( Str( Int( ( Date() - dNacimiento ) / 365.25 ) ) ) + " años."

Pregunta finalizada. Valoración: 5
Gracias experto me han servido mucho.

Volver al mensaje
http://www.todoexpertos.com/categorias/tecnologia-e-internet/programacion/visual-fox-pro/respuestas/1842407/ayuda-en-programas-extension-prg-de-visual