标题：currentchange刷新关联表不能调整宽度？

1楼

lur320 发表于：2024/1/29 13:34:00

    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

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

2楼

有点蓝 发表于：2024/1/29 13:51:00

代码在哪个表的事件？

3楼

lur320 发表于：2024/1/29 14:45:00

代码在父表的currentchange里面。即Tables("指令单.指令单物品表")这个黄色的表里。关联表是单向的

4楼

有点蓝 发表于：2024/1/29 15:11:00

试试把下面的代码放到"指令单物品表"的afterload事件里
Tables("指令单.指令单物品表").AutoSizeCols

共4 条记录, 每页显示 10 条, 页签: [1]