Ayuda para calcular años,meses y dias en VB ver 6
Publicado por Gerardo (14 intervenciones) el 14/06/2007 23:08:40
Hola amigos quisiera ver si me pueden ayudar estoy trabajando en visual basic V6 y necesito calcular edades con una exactitud de dias, he usado la funcion, donde fecha es una fecha anterior a la actual
DIA = DateDiff("D", fecha, Date)
MES = DateDiff("M", fecha, Date)
AÑO = DateDiff("YYYY", fecha, Date)
resulta que la que calcula los años es inexacta si le doy la fecha por ejemplo 1/12/2006 al ejecutar esa funcion me da "1" y tendria que darme "0", asi que es incorrecto por que aun no se cumple el año, me gustaria que me pudieran ayudar con una funcion o rutina de VB ver 6, para calcular de una fecha anterior a la fecha actual en años, meses y dias pero que sea exacto por que estoy haciendo una aplicacion para niños que necesito una exactitud de horas.
Gracias de antemano a todo el foro por su ayuda
DIA = DateDiff("D", fecha, Date)
MES = DateDiff("M", fecha, Date)
AÑO = DateDiff("YYYY", fecha, Date)
resulta que la que calcula los años es inexacta si le doy la fecha por ejemplo 1/12/2006 al ejecutar esa funcion me da "1" y tendria que darme "0", asi que es incorrecto por que aun no se cumple el año, me gustaria que me pudieran ayudar con una funcion o rutina de VB ver 6, para calcular de una fecha anterior a la fecha actual en años, meses y dias pero que sea exacto por que estoy haciendo una aplicacion para niños que necesito una exactitud de horas.
Gracias de antemano a todo el foro por su ayuda
Valora esta pregunta
0