[讨论]如何在关联的子表中锁定字段 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → [讨论]如何在关联的子表中锁定字段

共有2341人关注过本帖树形打印复制链接主题：[讨论]如何在关联的子表中锁定字段

积水成渊

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

加好友

发短信

等级：小狐帖子：348 积分：2805 威望：0 精华：0 注册：2016/8/24 10:39:00

[讨论]如何在关联的子表中锁定字段 发帖心情

Post By：2017/2/28 10:22:00 [只看该作者]

现在有A,B两张表进行了关联，A表为主表，B表子表，这两张表在一个窗口中显示，当B的字段审核状态为已审核时，自动锁定B表的所有字段。求解决办法

积水成渊

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

加好友

发短信

等级：小狐帖子：348 积分：2805 威望：0 精华：0 注册：2016/8/24 10:39:00

Post By：2017/2/28 10:25:00 [只看该作者]

我如下的代码，实现不了功能，求解决

If e.DataRow("审核状态") = "已审核" Then

Dim cl As Col

cl = Tables("B").Cols("新值")

cl.AllowEdit = false

cl = Tables("B").Cols("审核状态")

cl.AllowEdit = false

End If

有点色

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

加好友

发短信

等级：超级版主帖子：13837 积分：69650 威望：0 精华：0 注册：2016/11/1 14:42:00

Post By：2017/2/28 10:32:00 [只看该作者]

If e.DataCol.name = "审核状态" Then
    For Each cdr As DataRow In e.DataRow.GetChildRows("B")
        cdr.Locked = (e.DataRow("审核状态") = "已审核")
    Next
End If

积水成渊

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

加好友

发短信

等级：小狐帖子：348 积分：2805 威望：0 精华：0 注册：2016/8/24 10:39:00

Post By：2017/2/28 11:12:00 [只看该作者]

提示错误，---------------------------

错误

---------------------------

编译错误:“DataCol”不是“RowColEventArgs”的成员。

错误代码：If e.DataCol.name = "单据状态" Then

---------------------------

确定

---------------------------

积水成渊

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

加好友

发短信

等级：小狐帖子：348 积分：2805 威望：0 精华：0 注册：2016/8/24 10:39:00

Post By：2017/2/28 11:24:00 [只看该作者]

关联表没有datatable吧

有点蓝

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

加好友

发短信

等级：超级版主帖子：105951 积分：538830 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2017/2/28 11:38:00 [只看该作者]

代码写到A表DataColChanged事件

积水成渊

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

加好友

发短信

等级：小狐帖子：348 积分：2805 威望：0 精华：0 注册：2016/8/24 10:39:00

Post By：2017/2/28 13:50:00 [只看该作者]

谢谢，已经解决

下一主题 >> << 上一主题

主题：[讨论]如何在关联的子表中锁定字段