主题：请专家帮忙看看，表达式列的问题！

商品入库点击修改的时候出错了（是不是删除了新增出库的窗口了？）。

是点“修改入库”

把取消的代码设置成这样：

Dim r As DataRow = Tables("商品入库").Current.DataRow
r("入库数量") = r.OriginalValue("入库数量")
Tables("商品入库").Current.Reject()
'DataTables("商品入库").DataCols("入库量").RaiseDataColChanged()
e.Form.Close()

还有，需要把窗口设置为“独立”，不要设置为“模式”窗口。

Dim r As DataRow = Tables("商品入库").Current.DataRow
r("入库数量") = r.OriginalValue("入库数量")
Tables("商品入库").Current.Reject()
'DataTables("商品入库").DataCols("入库量").RaiseDataColChanged()
DataTables("商品入库").DataCols("入库数量").RaiseDataColChanged()
e.Form.Close()
DataTables("商品库存").Load()

这样可以了，测试过了。

可以的，但是我不知道你的tree是放在哪里的。