你在子表的datacolchanged事件,写代码重置列
If e.DataCol.Name = "金额" Then DataTables("订单主表").DataCols("数量").RaiseDataColChanged("订单编号 = '" & e.DataRow("订单编号") & "'")End If