主题：调整第一列宽度

sizeChanged事件，写代码，如

Dim t As WinForm.Table = e.Form.Controls("Table1")
Dim w As Integer = 0
For Each c As object In t.Table.grid.Cols
    w += c.widthdisplay
Next
If w < t.width Then
    t.Table.grid.Cols(1).widthdisplay += t.width-w
End If