Operar Dentro De Un Label.

[salvador]

Hola amigos,Dentro de un formulario, tengo un label con la fecha del sistema,un textbox,donde se introduce la fecha de nacimiento, y .... quisiera que en otro label,apareciese la edad de la...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[reta]

prueba con esto:

me.label7.caption= INT (val( label3.caption) - val(textbox4.value) / 365,25 )

ojalá te sirva

 

[reta]

365.25 ahí­ sí­ (ojo con el punto)

 

[salvador]

Gracias RETA. lo que me propones ya lo habia hecho anteriormente y me sigue dando un valor que no es el adecuado....
Pienso que sera algo que tenga que ver con el formato fecha de los LABEL'S o...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[jbf99]

Revisa los parentesis es INT((A-B)/C)
Un saludo

 

[sailepaty]

Hola Salvador,

Sin revisar si la conversión de valores o si la formula es la adecuada. Pero si analizando el orden en que las operaciones matemáticas son resueltas en Excel creo que te faltan un...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[salvador]

TENEIS RAZON CON EL TEMA DE LOS PARENTESIS....PERO, NI AUN ASI. NO SALE.


GRACIAS

 

[sailepaty]

Haber esto, considerando que ya tienes controlado los datos en label3 y textbox4.

label7= INT ((CDate(label3) - CDate(textbox4)) / 365,25 )

Saludos

 

[Adrian]

Hola!
Esto puede ser una ayuda:

Dim Edad As Integer
If IsDate(Me.TextBox1) Then
Edad = DateDiff("yyyy", CDate(Me.TextBox1), Date)
If Month(CDate(Me.TextBox1)) < Month(Date) Then
Edad =...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[salvador]

Gracias Sailepaty,con tu ultimo aporte lo has clavado..... es justo ese el codigo que necesita el dichoso label para funcionar....
Adrian,....tu codigo no lo he probado aun pero estoy seguro de...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[KL]

otra forma:

Label7.Caption = DateDiff("yyyy", DateValue(TextBox4), DateValue(Label3))