Hola Amigos tengo un problemin

, estoy trabajando en vb6 con base de datos acses 2000 conexion ADO, el tema es que cuando quiero calcular el valor del campo edad lo hace corectamente pero cuando paso a otro registro, o quiero guardar los datos ingresados, se produce un error y no guarda el calculo en la tabla de la db.
el codigo que uso es el siguiente:
Text1.Text = Date
Text2 = DateDiff("m", txtFECHA_NACIMIENTO, Text1)
txtEDAD = (Text2 / 12)
si alguien me puede ayudar lo agradezco muchio