Jordi Rabadan

Julián González Cabarcos respondió: Jordi, si lo que quieres es saber la edad en años, la función Datediff es una porquería, es mejor poner Edad=fix((fecha2-fecha1)/365.24) Las fechas como tal no existen, todos los ordenadores trabajan con números correspondientes al día. Por tanto, si...

Julián González Cabarcos respondió: Jordi, no sé si lo he entendido, pero si tengo el formulario Y "marco" la casilla de verificación Se va a la página 20. En el evento Después de actualizar de la casilla le tengo puesto Private Sub Verificación24_AfterUpdate() If Verificación24 = -1...

Sveinbjorn El Rojo respondió: Puedes hacer otra cosa: validar si estás o no en un registro nuevo para hacer el cálculo. Por ejemplo: Private Sub Form_Current() If Me.NewRecord Then Exit Sub Me.IMC.Value = fntCalculaIMC(Me.PESO.Value, Me.ALTURA.Value) End Sub Así, si te mueves a...

Sveinbjorn El Rojo respondió: Presumo que el error te sale porque el código que tienes para incrementar el número de prueba en el subformulario se ejecuta (porque lo llamas desde algún evento del form principal) antes de que el campo PATNO tenga un valor. Para solucionarlo puedes...

Jacinto Trillo Jareño respondió: Jordi: Supongo que tu estructura de Formularios es "FPacientes" como Formulario principal y "FPacientesPruebasSunF", como subformulario en el que tienes un Vinculo por PATNO. Si eso es así en Form_Current del SubFormulario, pones éste código Private...