有分区面板SplitContainer1,垂直分割,窗口form中fill在右分区嵌套分区面板SplitContainer2,垂直分割,fill
目的:希望3个分区根据电脑分比率自动调整宽度,使得每个分区各占SysInfo.WorkingAreaWidth的三分之一
窗口中的afterload事件为:
Dim sc1 As WinForm.SplitContainer = e.Form.Controls("SplitContainer1")
Dim sc2 As WinForm.SplitContainer = e.Form.Controls("SplitContainer2")
sc1.SplitterWidth = 1
sc2.SplitterWidth = 1
sc1.IsSplitterFixed = True
sc2.IsSplitterFixed = True
sc1.SplitterDistance = (SysInfo.WorkingAreaWidth - sc1.SplitterWidth - sc2.SplitterWidth)/3
sc2.SplitterDistance = (SysInfo.WorkingAreaWidth - sc1.SplitterWidth - sc2.SplitterWidth) * 2/3
问题:结果最左边的分区符合要求,但是中间和最右边的分区没有任何变化
请问代码问题是什么呢,怎么调整?非常感谢大家帮助解决