Dim drs As List(Of DataRow)
drs = DataTables("加工单明细").Select("[加工单号] = '" & e.DataRow("加工单号") & "' And [行号] > '" & e.DataRow("行号") & "'" )
For Each dr As DataRow In drs
MessageBox.Show(dr("行号"))
dr("开工数量") = e.DataRow("完工数量")
dr("完工数量") = e.DataRow("完工数量")
Next
代码是这样的，最大行数是5，修改了第1行的完工数量，结果发现弹出窗口的发现不是执行一次。。而是执行了多次。2，3，4，5。。应该执行到这里就完成后。。结果后面继续5，4，5，3。。
这是什么情况呢？
第一次打开的时候更夸张，1，2，3，4，5，5，4，5，3。。。连第1行多执行了。。
重新打开软件后才恢复正常，但执行的次数还是多了。。
知道问题了。。。
因为代码是卸载DataColChanged里。。后面的行也修改了。。所以执行了。。有没有什么方法避免多次执行呀。。
[此贴子已经被作者于2017/10/9 10:29:49编辑过]
加好友 
发短信
Post By：2017/10/9 10:26:00 [只看该作者]
