主题：[求助]窗口可否根据窗口内表格大小变化而变化

循环每一列，合计列的宽度，累加起来。

Dim t As Table = Tables("表A")
Dim sum As Double = 0
For i As Integer = 0 To t.grid.cols.count-1
    If t.grid.cols(i).visible Then
        sum += t.grid.cols(i).widthdisplay
    End If
Next
output.show(sum)