专家坐堂-currentchange刷新关联表不能调整宽度？Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  currentchange刷新关联表不能调整宽度？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=190294)

--  作者：lur320
--  发布时间：2024/1/29 13:34:00
--  currentchange刷新关联表不能调整宽度？

    Dim zld As String = Tables("指令单").current("指令单号")
    If zld IsNot Nothing Then
        DataTables("指令单物品表").Loadfilter = "指令单号=\'" & zld & "\'"
    Else
        DataTables("指令单物品表").Loadfilter = "指令单号 is nothing"
    End If

    DataTables("指令单物品表").Load(False)

    Tables("指令单.指令单物品表").AutoSizeCols

最后一段代码，关联表并没有调整列宽度。但是单独在命令窗口是可以调整的，为啥？

--  作者：有点蓝
--  发布时间：2024/1/29 13:51:00
--
代码在哪个表的事件？

--  作者：lur320
--  发布时间：2024/1/29 14:45:00
--
代码在父表的currentchange里面。即Tables("指令单.指令单物品表")这个黄色的表里。关联表是单向的

--  作者：有点蓝
--  发布时间：2024/1/29 15:11:00
--
试试把下面的代码放到"指令单物品表"的afterload事件里
Tables("指令单.指令单物品表").AutoSizeCols