以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何在我动态生成的面板里面继续添加其他控件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=109580)
--  作者：Devil
--  发布时间：2017/11/15 11:12:00
--  [求助]如何在我动态生成的面板里面继续添加其他控件
求助大佬，如何在我动态增加的面板里面继续添加label等控件
Dim txt As WinForm.panel
Dim top As Integer = 0
txt = e.Form.CreateControl("panel1", ControlTypeEnum.panel)
For Each c As WinForm.Control In e.Form.Controls
    If Typeof c Is WinForm.Panel Then \'判断控件是否是面板
        txt.Top = top
        top += 350
        txt.Left = 10
        txt.width = 500
        txt.height = 300
        txt.backcolor = color.Azure
        e.Form.Controls("TabControl6").Tabpages(0).AddControl(txt)
    End If
Next
上面是我在button里写的增加面板，我想在这个代码里给他增加在增加的面板里添加其他控件的功能该怎么写啊
--  作者：有点甜
--  发布时间：2017/11/15 12:22:00
--  

如代码

 

Dim lbl As WinForm.Label
lbl = e.Form.CreateControl("lable1", ControlTypeEnum.Label)
lbl.Text = "Foxtable"
lbl.Left = 100
lbl.Top = 100

txt.AddControl(lbl)
--  作者：有点甜
--  发布时间：2017/11/15 12:23:00
--  
如果不会做，具体实例发上来测试。