主题：动态生成分区面板

例如：

Dim tab As WinForm.TabControl = e.Form.Controls("TabControl1")
tab.TabPosition = Windows.Forms.TabAlignment.Left

设置分区面板的pane1或者panel2的extendSize属性

我测试有用：

Dim sp As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
sp.Panel1.ExtendSize = new size(1000,1000)

我测试你的明明有用。

另：0怎么能作为宽度？

p.ExtendSize = New Size(0,800)

改为

p.ExtendSize = New Size(800,800)

你问的是ExtendSize。

呵呵，我回答时只留意了你最后一贴，没有看到前面的问题，还以为你要设置扩展区域呢，设置扩展区域不能通过SplitContainer，而必须通过Panel1和Panel2。

不同的问题，最好分别发帖提问，否则容易疏忽。