Recalculating.... message at the bottom bar

[Jrb via AccessMonster.com]

My transaction form is Main/Subform. My subform has 3 fields that are coded
to have recalculated:

sub qty_update()
....
.....
me.total.value = me.qty.value * me.uprice.value
me. recalc
end sub

sub uprice_update()
......
......
me.total.value = me.qty.value * me.uprice.value
me.recalc
end sub

the total field has the recordsource as: =me.qty.value * me.uprice.value

In this way, I could get the realtime effect of the grand total calculation
in my mainform. The problem is that the performance. Everytime I entered a
new data, or course it always recalculates. I cannot find a way to have the
grand total be updated dynamically. My subform is bounded to a table, so all
the fields are considered updated and data have been saved.

Is there any other way to have my Mainform dynamically recalculated? I made a
textbox in subform to get to the sum of all the total and a controlsource as
: =sum(total), then in my Mainform a references to the textbox value.

Thank you for your help. I really appreciate it.

Jrb