楼主可能要的是这个:
Forms("订单管理").Controls("TextBox1").text = Tables("订单管理").Compute("Sum(结算金额)")
Table也有compute方法,而且仅仅针对已经筛选出来的行