因项目需要，用以下代码替代备注列原有的“自动隐藏”功能

For Each a As object In Tables("表A").grid.parent.controls
    For Each b As object In a.controls
        If Tables("表A").Cols.Contains(b.text)
            b.AutoHiding = not b.AutoHiding
            Exit For
        End If
    Next
Next

以上代码如果备注列窗口不临时打开时操作很正常，但是一但鼠标停留在列窗口标题处列窗口临时打开时（如下图），再执行以上代码便出现以下提示，无法执行，请问如何避免？谢谢！

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

版本:2019.11.3.1

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

代码执行出错,错误信息:  System.MissingMemberException: 未找到类型"C1DockingTabPage"的公共成员"AutoHiding".    在 Microsoft.VisualBasic.CompilerServices.Symbols.Container.GetMembers(String& MemberName, Boolean ReportErrors)    在 Microsoft.VisualBasic.CompilerServices.NewLateBinding.ObjectLateGet(Object Instance, Type Type, String MemberName, Object[] Arguments, String[] ArgumentNames, Type[] TypeArguments, Boolean[] CopyBack)    在 Microsoft.VisualBasic.CompilerServices.NewLateBinding.LateGet(Object Instance, Type Type, String MemberName, Object[] Arguments, String[] ArgumentNames, Type[] TypeArguments, Boolean[] CopyBack)    在 UserCode.Test()

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

确定   

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

此主题相关图片如下：1574946457(1).png