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

如图，窗口中表格是fill方法生成的，所以数据的长短可能都会有变化，有没有办法让窗口的大小适应中间表格大小去变呢
此主题相关图片如下：qq截图20180802142940.png

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

 

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)