表A为入库明细单，有以下内容：通知单号 品名 是否制单（逻辑字段）
D01 A 、
D01 B
D02 C
表B为入库通知单，有以下内容
通知单号 入库日期
D01 2014-01-01
D02 2014-01-02
现在的要求是当表A中的通知单号能在表B中找到时，“是否制单”为TRUE，反之为FALSE。
我目前解决了单表B的通知单号列发生变化时，表A的对应通知单号的是“否制单列”会发生变化。
现在的问题是，我如果直接把表B中的一行数据删除，例如删除表B的D01这一行，表A中只有品名为A的是否制单变为了FALSE，而品名B还是TRUE，我实在不解，我的代码如下：
表B的 BeforeDeleteDataRow事件
For Each dr As DataRow In DataTables("表A").DataRows
dr = DataTables("表A").Find("[通知单号] = '" & e.DataRow("通知单号") & "'")
If dr IsNot Nothing Then '如果找到了,也就是dr不是Nothing
dr("是否制单")=False
dr.Save()
End If
Next
请老师帮我看看，到底错哪了，谢谢！
加好友 
发短信
Post By：2014/12/21 21:40:00 [显示全部帖子]
