以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]父表当前行审核后被锁定,如何禁止子表继续增加行代码  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=76943)

--  作者:liuyixin662
--  发布时间:2015/11/8 16:07:00
--  [求助]父表当前行审核后被锁定,如何禁止子表继续增加行代码
[求助]窗口中:父表当前行审核后被锁定,如何禁止子表继续增加行的按钮代码
--  作者:大红袍
--  发布时间:2015/11/8 16:11:00
--  

If Tables("表A").Current.Locked Then

    return

End If

 


--  作者:liuyixin662
--  发布时间:2015/11/8 16:24:00
--  

谢谢!

 


--  作者:liuyixin662
--  发布时间:2015/11/8 18:49:00
--  
红袍兄弟,代码我试了,我窗口中有个主表,还有个关联表,把代码复制了还是不行,主表与关联表通过审核后行都锁定了达到了不能编辑的要求,现在有个问题增加行按钮还是不受控制,已审核的关联表的行还可增加,请指教,谢谢!
--  作者:大红袍
--  发布时间:2015/11/8 19:40:00
--  

CurrentChanged事件

 

If e.Table.Current Nothing OrElse Current.Locked Then

    Tables("表A.表B").AllowEdit = False

Else

    Tables("表A.表B").AllowEdit = True

End If