以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  怎么设置列窗口不允许关闭  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=97439)

--  作者:MADAJEAN
--  发布时间:2017/3/12 19:56:00
--  怎么设置列窗口不允许关闭
怎么设置列窗口不允许关闭,
--  作者:有点色
--  发布时间:2017/3/13
--  

参考代码

 


For Each a As OBJECT In Tables("表A").grid.Parent.controls
    For Each b As OBJECT In a.controls
        msgbox(b.text)
        If B.text = "第十列" Then
            b.CanCloseTabs = False
            b.CanAutoHide = False
        End If
    Next
Next