Foxtable(狐表)用户栏目专家坐堂 → groupbox


  共有3987人关注过本帖树形打印复制链接

主题:groupbox

帅哥哟,离线,有人找我吗?
1498351234
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:150 积分:1969 威望:0 精华:0 注册:2017/2/19 9:09:00
groupbox  发帖心情 Post By:2023/2/24 10:58:00 [只看该作者]

老师好!
调用DLL后,能遍历到dll中有个groupBox1的控件,但是groupbox1里的控件看不见。如何让groupBox1能看见,或是遍历到也行?
以下是窗口AfterLoad的代码
Dim FormTest As new HxgcDeviceDemo.Form1
FormTest.TopLevel = False
FormTest.Parent = e.Form.Controls("Panel1").BaseControl
e.Form.Controls("Panel1").BaseControl.Controls.Add(FormTest)

For Each c As Winform.Control In e.Form.Controls
    msgbox(c.Name)      '这里显示有 panel1 和 groupBox1
Next

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110744 积分:563646 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/2/24 11:04:00 [只看该作者]

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

 回到顶部