以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]关于遍历窗口中容器的控件问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=90117)
--  作者：2900819580
--  发布时间：2016/9/6 8:33:00
--  [求助]关于遍历窗口中容器的控件问题
问题一、如下代码，调试不通过
问题二、 如果控件在SplitContainer中的Panel1区中，代码又应该怎么写。

For Each f As WinForm.Control In e.Form.Controls("GroupBox2")
    
    If Typeof f Is WinForm.CheckBox Then
        Dim chk As WinForm.CheckBox = f
        If chk.Checked = True Then
            MessageBox.Show(chk.name & "|" & "选上了")
        End If
    End If
Next

谢谢
--  作者：有点蓝
--  发布时间：2016/9/6 9:04:00
--  
For Each f As WinForm.Control In e.Form.Controls("GroupBox2").Children

For Each f As WinForm.Control In e.Form.Controls("SplitContainer1").Panel2.Children
--  作者：lhpc120
--  发布时间：2018/2/12 17:51:00
--  
For Each c As WinForm.Control In e.Form.Controls("SplitContainer3").Panel2.Children
    If Typeof c Is WinForm.Line Then
        Dim pp As WinForm.Line = c
        Output.Show(pp.name)
    End If
Next

这样用好像不行吧
--  作者：有点甜
--  发布时间：2018/2/12 18:35:00
--  

msgbox(e.Form.Controls("SplitContainer3").Panel2.Children.count) 看弹出什么

 

代码没问题的，不然做个例子测试。