以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于关联表的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=19757)
--  作者：rjh4078
--  发布时间：2012/5/20 20:35:00
--  关于关联表的问题

有表A 和表B是关联表 A父 B子

现在想实现 如果在A表中增加了行 但是B表中没有增加与之关联的行 就提示用户 请问要根据什么来判断呢
--  作者：mr725
--  发布时间：2012/5/20 20:55:00
--  

在表A的 DataRowAdded 事件中:

Dim dr As DataRow
dr = DataTables("表B").Find("关联列 = \'" & e.datarow("关联列") & "\'")
If dr Is Nothing
Tables("表B").Addrow()
--  作者：rjh4078
--  发布时间：2012/5/20 23:40:00
--  

非常感谢