主题：[求助]自定义函数问题

   和昨天的一样 没有测试出哪里的问题

老师，

Dim pg As WinForm.TabPage=tab.TabPages(dr("ym_gzid"))
    Dim s1 As WinForm.SplitContainer=FormS(dr("ckname")).CreateControl("SPL_ml_" & dr("ym_gzid"),ControlTypeEnum.SplitContainer)
    Dim trvmls As WinForm.TreeView=FormS(dr("ckname")).CreateControl("trv_zy_" & dr("ym_gzid"),ControlTypeEnum.TreeView)
    Dim pmkj As WinForm.Panel=FormS(dr("ckname")).CreateControl("pnl_kj_" & dr("ym_gzid"),ControlTypeEnum.Panel)
    Dim pmcx As WinForm.Panel=FormS(dr("ckname")).CreateControl("pnl_cx_" & dr("ym_gzid"),ControlTypeEnum.Panel)
    Dim pmcz As WinForm.Panel=FormS(dr("ckname")).CreateControl("pnl_cz_" & dr("ym_gzid"),ControlTypeEnum.Panel)
    Dim pmxs As WinForm.Panel=FormS(dr("ckname")).CreateControl("pnl_xs_" & dr("ym_gzid"),ControlTypeEnum.Panel)
    'S1.BackMost=True
    Dim s2 As WinForm.SplitContainer=FormS(dr("ckname")).CreateControl("SPL_kj_" & dr("ym_gzid"),ControlTypeEnum.SplitContainer)
    Dim s3 As WinForm.SplitContainer=FormS(dr("ckname")).CreateControl("SPL_cx_" & dr("ym_gzid"),ControlTypeEnum.SplitContainer)
    S3.Orientation=0
    Dim s4 As WinForm.SplitContainer=FormS(dr("ckname")).CreateControl("SPL_xs_" & dr("ym_gzid"),ControlTypeEnum.SplitContainer)
    'S4.TopMost=True
    S4.Orientation=0
    S1.Panel2.AddControl(S2)
    S1.Panel1.AddControl(trvmls)
    S2.Panel1.AddControl(S3)
    S2.Panel2.AddControl(pmkj)
    S3.Panel2.AddControl(S4)
    S3.Panel1.AddControl(pmcx)
    S4.Panel2.AddControl(pmcz)
    S4.Panel1.AddControl(pmxs)
    pmxs.BackColor=Color.red
    trvmls.Dock=5
    pmkj.Dock=5
    pmcx.Dock=5
    pmcz.Dock=5
    pmcz.Dock=5
    S1.FixedPanel=1
    S2.FixedPanel=2
    S3.FixedPanel=1
    S4.FixedPanel=2
    S1.Dock=5
    S2.Dock=5
    S3.Dock=5
    S4.Dock=5
    pg.AddControl(S1)

For Each cname As WinForm.Control In pg.Children
    MessageBox.Show(1)
Next


绿色的部分 都不显示，应该是什么原因呢？

 https://pan.baidu.com/s/1pLdrmyR


麻烦老师您给看看

 自定义函数loop 中的21楼的代码部分 添加Botton 不成功

 老师，
  测试了两天两夜，劳烦您给看下，现在看着都想吐了

明明没有问题 为什么就是不行。

哎呀 真是的 这里忘改了 ，问题不是这里，我在上传一个

 老师，
   不是这里 ，这块您改下之后，就继续会出现提示，我反复提的那个问题“控件找不到”