那就遍历分区面板,如
Dim sp As WinForm.SplitContainer = e.Form.controls("SplitContainer1")For Each c As object In sp.Panel1.Children msgbox(c.name)NextFor Each c As object In sp.Panel2.Children msgbox(c.name)Next