主题：如何用代码设置列窗口的“独立停靠”属性？

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

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