Access - problemas con secuencia en access

Hola, tengo unos checks y un formulario que estan dentro de un control de fichas, tiene varias paginas.......
en la pagina A hay un cuadro de texto, el cual recoje la fecha de nacimiento y esta vinculado a un valor dentro de una tabla como fecha corta.....
la cosa es calcular la edad, este seria el codigo que he usado:

'Calculo de la edad
Function Calcular_Edad(Fecha_Nacimiento As Variant) As Integer
Dim Años As Variant
' comprueba si el valor no es nulo
If IsNull(Fecha_Nacimiento) Then
Calcular_Edad = 0
Exit Function
End If

Años = DateDiff("yyyy", Fecha_Nacimiento, Now)

If Date < DateSerial(Year(Now), Month(Fecha_Nacimiento), _
Day(Fecha_Nacimiento)) Then
Años = Años - 1
End If

Calcular_Edad = CInt(Años)
End Function

lo deseado:
si este calculo fuera mayor a x y se "picara" uno de estos check en la pagina b, se deveria activar otro check en la pagina A
¿como lo haria?
gracias

hola de nuevo, este es el codigo modificao, hay que depurarlo un poco