以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  遍历控件问题我要遍历GroupBox1中的所有ColorPicker求代码修改  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=196626)

--  作者:李小胖
--  发布时间:2025/5/21 11:57:00
--  遍历控件问题我要遍历GroupBox1中的所有ColorPicker求代码修改
未找到类型“GroupBox”的公共成员“ColorPickers”。 
For Each ctrl As WinForm.ColorPicker In e.Form.Controls("GroupBox1").ColorPickers
    


    If TypeOf ctrl Is WinForm.ColorPicker Then
        Dim colorPicker As WinForm.ColorPicker = DirectCast(ctrl, WinForm.ColorPicker)
        If colorPicker.Text IsNot Nothing Then
            MessageBox.Show(colorPicker.Text)
        End If
    End If
Next

--  作者:有点蓝
--  发布时间:2025/5/21 11:59:00
--  
For Each ctrl As WinForm.Control In e.Form.Controls("GroupBox1").Children