以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  扩展列窗口尺寸宽怎么设置  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=113423)
--  作者：cd_tdh
--  发布时间：2018/1/15 20:05:00
--  扩展列窗口尺寸宽怎么设置
扩展列(图片)窗口尺寸宽怎么设置
--  作者：有点蓝
--  发布时间：2018/1/15 20:33:00
--  
命令窗口执行看效果

For Each a As OBJECT In Tables("表A").grid.parent.controls
    For Each b As OBJECT In a.controls
        output.show(b.text)
        If b.text = "图片列" Then
            b.width = 500
        End If
    Next
Next
--  作者：cd_tdh
--  发布时间：2018/1/16 14:31:00
--  

执行没得反应
--  作者：有点甜
--  发布时间：2018/1/16 16:08:00
--  

列窗口的尺寸？代码是没问题的。

 

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.width = 500
        End If
    Next
Next
--  作者：cd_tdh
--  发布时间：2018/1/17 16:06:00
--  

可以了

[此贴子已经被作者于2018/1/17 16:07:36编辑过]