以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何用代码设置列窗口的“独立停靠”属性？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=86741)
--  作者：y2287958
--  发布时间：2016/6/24 16:18:00
--  如何用代码设置列窗口的“独立停靠”属性？
如题，谢谢！
--  作者：大红袍
--  发布时间：2016/6/24 16:32:00
--  

 呃，不行，无法设置。你最多获取到列窗口

 

Dim obj As object
For Each a As object In Tables("表A").Grid.Parent.Controls
    For Each b As object In a.Controls
        If b.text = "第四列" OrElse b.text = "第五列" Then
            obj = b
        End If
    Next
Next

obj.SelectedIndex = 0
--  作者：y2287958
--  发布时间：2016/6/24 17:16:00
--  
噢，谢谢。
看来只能动手做窗口了