参考代码
Dim p1 As WinForm.SplitPanel = e.Form.Controls("SplitContainer1").Panel1For Each c As object In p1.children msgbox(c.name)Next
Dim p2 As WinForm.SplitPanel = e.Form.Controls("SplitContainer1").Panel2For Each c As object In p2.children msgbox(c.name)Next