以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何设定每月过了10日,所有数据不能编辑,锁定状态?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=129931)

--  作者:jseteary
--  发布时间:2019/1/9 9:47:00
--  如何设定每月过了10日,所有数据不能编辑,锁定状态?
如何设定每月过了10日,所有数据不能编辑,锁定状态?
--  作者:jseteary
--  发布时间:2019/1/9 9:47:00
--  请老师指点
请老师指点
--  作者:有点甜
--  发布时间:2019/1/9 9:59:00
--  

afterOpenProject事件

 

If Date.Today.Day > 10 Then
    For Each t As Table In Tables
        t.AllowEdit = False
    Next
End If