主题：[求助]如何动态修改分区面板方向

如题，现在需要根据分辨率动态修改分区面板方向，但是分区面板控件的属性中并没有方向有关的。

Dim sp = e.form.controls("SplitContainer1")
sp.Orientation = 0 '0-1

 

全部属性

 

BorderStyle
Orientation
FixedPanel
SplitterWidth
IsSplitterFixed
SplitterDistance2
FixedPanel2
SplitterDistance
BackColorOfPanel1
Panel1IsAutoScroll
BackColorOfPanel2
Panel2IsAutoScroll
Panel1Collapsed
Panel2Collapsed
Panel1
Panel2
BindingField
ReadOnly
BaseControl
Name
Enabled
Visible
Left
Top
Width
Height
Anchor
Dock
BackColor
ForeColor
Font
TabIndex
TabStop
CausesValidation
TopMost
BackMost
Printable
NewPage
PrintBorder
Location
Size
Focused
Cursor
CursorType
ToolTip
Error
BindTable
BindRow
BindCol
ImeMode
Form
Parent
ContextStrip

谢谢甜老师，已解决。