Foxtable(狐表)用户栏目专家坐堂 → [求助]


  共有2675人关注过本帖树形打印复制链接

主题:[求助]

帅哥哟,离线,有人找我吗?
hbhuayue
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:10 积分:258 威望:0 精华:0 注册:2017/12/19 22:16:00
[求助]  发帖心情 Post By:2020/5/5 8:31:00 [只看该作者]

请问各位专家,如果有一个“表A”和关联表“表B”,表A示父表,如何设置代码,在什么位置设置代码,来控制表B中的关联行只允许增加1行?超出1行将跳出提示?谢谢!

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/5 8:41:00 [只看该作者]

表B,BeforeAddDataRow事件

Dim r As Row = Tables("表A").Current
If r IsNot Nothing Then
    If r.DataRow.GetChildRows("表B").Count > 0 Then
        e.Cancel = True
    End If
End If

 回到顶部