窗口中的页面集合有4个页面,每个页面内有一个分区面板,希望在打开窗口时每个分区面板的两个分区大小一样,代码如下,放在窗口的afterload事件中,但没有起作用,是何原因?
Dim sp3 As WinForm.SplitContainer = e.Form.Controls("SplitContainer3")
sp3.SplitterDistance = sp3.Width * 0.5
Dim sp4 As WinForm.SplitContainer = e.Form.Controls("SplitContainer4")
sp4.SplitterDistance = sp4.Width * 0.5
Dim sp5 As WinForm.SplitContainer = e.Form.Controls("SplitContainer5")
sp5.SplitterDistance = sp5.Width * 0.5
Dim sp6 As WinForm.SplitContainer = e.Form.Controls("SplitContainer6")
sp6.SplitterDistance = sp6.Width * 0.5
[此贴子已经被作者于2017/7/9 14:07:24编辑过]