Calcular edad en años, meses o días con DateTimePicker?

[TecZr]

Buenas,

tengo una pregunta respecto a como calcular edad.

En mi formulario de clientes, necesito especificar la edad de una persona, comparando la fecha ingresada en un DateTimePicker con la fecha actual, ya sea en años, meses o días de nacida y lo muestro en un label...

Tengo este código:

Código vb:

'calcular edad  ingresando datos en date time picker
            If DateDiff(DateInterval.Day, datetimepickerFechaNacimiento.Value, Now.Date) < 30 Then
                lblEdad.Visible = True
                lblEdad.Text = (DateDiff(DateInterval.Day, datetimepickerFechaNacimiento.Value, Now.Date)) & " día/s"
 
            ElseIf 29 < DateDiff(DateInterval.Month, datetimepickerFechaNacimiento.Value, Now.Date) < 365 Then
                lblEdad.Visible = True
                lblEdad.Text = (DateDiff(DateInterval.Month, datetimepickerFechaNacimiento.Value, Now.Date)) & " mes/es"
 
            ElseIf DateDiff(DateInterval.Year, datetimepickerFechaNacimiento.Value, Now.Date) > 365 Then
                lblEdad.Visible = True
                lblEdad.Text = (DateDiff(DateInterval.Year, datetimepickerFechaNacimiento.Value, Now.Date)) & " año/s"
            End If
 

El detalle es que solo me muestra los días de nacido, o si son mas de 30 días me muestra 1 mes, 2 meses, 3 meses... Hasta aquí todo va bien. Después de 12 meses, el primero año me lo muestra como 12 meses, 2 años como 24 meses, 3 años como 36 meses...

¿Qué hago o qué tengo que modificar en el código para que me muestre 1 año, 2 años, 3 años, etc, después del mes 12?

Gracias por adelantado!