主题：groupbox

For Each c As Winform.Control In e.Form.Controls

    msgbox(c.Name) '这里显示有 panel1 和 groupBox1

    If TypeOf c Is WinForm.GroupBox Then

        Dim k As WinForm.GroupBox = c

        For Each c1 As Winform.Control In k.children

            msgbox(c1.Name) '这里显示有 panel1 和 groupBox1

        Next

    End If 

    

Next