Con Visual Basic:
Public Shared Function Edad(ByVal FechaNacimiento As DateTime) As Double
Dim dblEdad As Double = _
DateTime.Now.Subtract(FechaNacimiento).TotalDays / 365.25
Return dblEdad
End Function
Public Shared Function FechaNacimiento(ByVal Edad As Double) As DateTime
Dim datFecha As DateTime = _
DateTime.Now().Subtract(TimeSpan.FromDays(Edad * 365.25))
Return datFecha
End Function
Con C#
public static double Edad(DateTime fechaNacimiento)
{
double edad = DateTime.Now.Subtract(fechaNacimiento).TotalDays/365.25;
return edad;
}
public static DateTime FechaNacimiento(double Edad)
{
DateTime fecha = DateTime.Now.Subtract(TimeSpan.FromDays(Edad * 365.25));
return fecha;
}
Para mayor información:
http://dotnetjunkies.com/WebLog/vbpuntonet/archive/2004/09/28/26945.aspx