e.Form.Controls("TextBox2").Value = cint(DataTables("统计表1").Compute("Sum(支出)"))
http://www.foxtable.com/help/topics/1513.htm