1、弄成副本 http://www.foxtable.com/webhelp/scr/1906.htm
2、没有必要关闭表;
3、timertick事件,定时统计赋值
http://www.foxtable.com/webhelp/scr/1301.htm
e.Form.Controls("TextBox1").Text = Tables("表名").Compute("sum(产量)")