Question

vb.net中tablelayoutpanel的使用

TableLayoutPanel1.ColumnStyles.Clear()
TableLayoutPanel1.RowStyles.Clear()
' TableLayoutPanel1.AutoScroll = True
' TableLayoutPanel1.BackColor = Color.Blue
TableLayoutPanel1.CellBorderStyle = TableLayoutPanelCellBorderStyle.Single
' TableLayoutPanel1.ColumnCount = 6
For i = 1 To 20
TableLayoutPanel1.ColumnStyles.Add(New ColumnStyle(SizeType.AutoSize))
TableLayoutPanel1.RowStyles.Add(New RowStyle(SizeType.AutoSize))

Dim lab As New Label
lab.Text = "lab+" & i
lab.AutoSize = True
TableLayoutPanel1.Controls.Add(lab)
TableLayoutPanel1.ColumnCount = i + 1
Next

结果什么都不显示。

Answer 1

动态生成的控件是不是忘记加到夫控件里面了？你可以加上一句Me.Controls.Add(TableLayoutPanel1)
你可以在窗体设计器里添加一个Label到TableLayoutPanel里，用记事本打开这个窗体的.design.vb文件查看系统添加的方式