Access - campo calculado en acces97

hola foreros:
tengo un formulario dentro de otro.
en el segundo formulario tengo los articulos de la factura y queria qu en el campo subtotal me sumara los datos del campo importe ( del formulario atriculos). este formulario lo tengo en vista hoja de datos

Hola
A mi se me ocurre que puedes usar en el evento current del formulario principal la siguiente funcion para asignarsela al campo total del formulario.

Fucntion CalcularTotal as double
on error goto err _calc
dim R as recordset
dim sql as string
if not me.newrecord then
sql = "Select sum(subtotal) from detalleFactura where numerofactura=numeroacturaactual"
set R = dbengine(0)(0).openrecordset(sql)
if not (r.bof and r.eof) then
if not isnull(r(0)) thne
CalcularTotal = r(0)
else
CalcularTotal=0
end if
else
CalcularTotal =0
end if
end if

exit_Calc:
exit function
Err_Calc:
msgbox err.description
resume exit_calc
end function

Nota: Esta funcion es solo una idea y no ha sido probada.