以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]备注  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=189521)

--  作者:风声
--  发布时间:2023/12/6 10:45:00
--  [求助]备注
老师,下面代码隐藏不了备注型列的窗口。



Dim t3 As Table = Tables("水电气费用记录")
For Each a4 As OBJECT In t3.grid.parent.controls
    For Each b As OBJECT In a4.controls
        If t3.Cols.contains(b.text) Then
            \'b.CanCloseTabs = False
            b.CanAutoHide = False
        End If
    Next
Next

--  作者:有点蓝
--  发布时间:2023/12/6 11:06:00
--  
只能关闭,无法隐藏
b.CanAutoHide = False
改为
b.dispose