主题：请教问题 如何达到这样的结果？

 2楼例子已经很清楚了

 

http://www.foxtable.com/help/topics/2490.htm

 

如下

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1.rar

 

 

你说的是删除产品表，不可能没反应。

你在 DataRowDeleted 事件写入代码

 

Dim filter As String = "产品编码 ='" & e.DataRow("产品编码") & "'  And 颜色 ='" & e.DataRow("颜色") & "' "
Dim fdr As DataRow = DataTables("库存表").Find(filter)
fdr("金额") -= e.DataRow("金额")

 没写错，测试有效。

 

 等价于 fdr("金额") = fdr("金额")  - e.DataRow("金额")

 呃，不一样，不能随便删除库存表的数据的，有可能你进货的时候，有多个同一货物。

 

DataRowDeleting

 

这个时候，行没有被删除，还可以用到e.Datarow

 

 

DataRowDeleted

 

这个时候，无法再用到e.Datarow