楼主:在表的DATACOLCHANGED事件中加入
select case e.datacol.name
case "数量","单价"
e.datarow("金额") =e.datarow("数量")*e.datarow("单价")
end select