[求助]锁定关联表得问题 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]锁定关联表得问题

共有3032人关注过本帖树形打印复制链接主题：[求助]锁定关联表得问题

viking

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：371 积分：3120 威望：0 精华：0 注册：2013/7/13 15:49:00

[求助]锁定关联表得问题 发帖心情

Post By：2014/3/26 22:35:00 [只看该作者]

父表:表A

字表：表A.表B

表A中当前行的第一列内容为“中国”和“美国”时

锁定表A.表B的关联行

是表A 当前行相应的关联行，不是整个字表！！！

求解答，本人菜鸟，谢谢

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/3/26 22:45:00 [只看该作者]

你可以设置子表的prepareedit事件：

Dim r As DataRow = e.Row.DataRow.GetParent("父表")
If r IsNot Nothing Then
    If r("列名") = "中国" OrElse r("列名") = "美国" Then
        e.cancel = True
    End If
End If

viking

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：371 积分：3120 威望：0 精华：0 注册：2013/7/13 15:49:00

Post By：2014/3/26 22:54:00 [只看该作者]

以下是引用有点甜在2014-3-26 22:45:00的发言：

你可以设置子表的prepareedit事件：

Dim r As DataRow = e.Row.DataRow.GetParent("父表")
If r IsNot Nothing Then
    If r("列名") = "中国" OrElse r("列名") = "美国" Then
        e.cancel = True
    End If
End If

GetParent

不是

datarow

成员

Dim r As DataRow = e.Row.DataRow.GetParent("父表")
说这个不对

有点甜

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/3/26 23:00:00 [只看该作者]

Dim r As DataRow = e.Row.DataRow.GetParentrow("父表")
If r IsNot Nothing Then
    If r("列名") = "中国" OrElse r("列名") = "美国" Then
        e.cancel = True
    End If
End If

viking

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：小狐帖子：371 积分：3120 威望：0 精华：0 注册：2013/7/13 15:49:00

Post By：2014/3/26 23:12:00 [只看该作者]

以下是引用有点甜在2014-3-26 23:00:00的发言：
Dim r As DataRow = e.Row.DataRow.GetParentrow("父表")
If r IsNot Nothing Then
    If r("列名") = "中国" OrElse r("列名") = "美国" Then
        e.cancel = True
    End If
End If

问下，如果两个表之间如果不是关联表得关系，这个还有效吗？