以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  记录窗口的列宽可以调整吗?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=93780)

--  作者:xvkewen
--  发布时间:2016/12/6 21:01:00
--  记录窗口的列宽可以调整吗?
如题,记录窗口的列宽可以调整吗?除了改列名,还有别的办法吗?
图片点击可在新窗口打开查看此主题相关图片如下:搜狗截图_2016-12-06_21-00-43.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2016/12/6 21:26:00
--  

For Each dt As DataTable In DataTables
    For Each a As OBJECT In Tables(dt.name).grid.parent.controls
        For Each b As OBJECT In a.controls
            \'output.show(b.text)
            If b.text = "总排期表" Then
                Dim d = b.controls(0).controls(0)
                d.Cols(0).width = 50
            End If
        Next
    Next
Next