Edad Exacta

Caz
11 de Abril del 2006
Saludos comunidad., quien de uds realizo la rutina de calcular la edad exacta de una persona, ingresando la fecha de nacimiento y comparandola con la fecha actual. Para que me la facilite por favor....

Caz...!
[email protected]

Snaker
11 de Abril del 2006
Dime algo, que contro estas usando.. imaginate el DtPicker

dim var1,var2,var3 as Date

var1 = Day(Date) & "/" & Month(Date) & "/" & Year(Date)
var2 = Day(DtPicker) & "/" & Month(DtPicker) & "/" & Year(DtPicker)

var3= var1 - var2
TXT.text = Cstr(var3)

FIN.

Carito
11 de Abril del 2006
Prové el codigo pero no funciona, en var3 se supone devieras almacenar la edad, pero se está almacenando una fecha lo que no tiene ni pies ni cabeza