Foxtable(狐表)用户栏目专家坐堂 → 关于函数的问题。


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

主题:关于函数的问题。

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


加好友 发短信
等级:婴狐 帖子:66 积分:505 威望:0 精华:0 注册:2012/3/14 19:38:00
关于函数的问题。  发帖心情 Post By:2012/6/4 15:14:00 [显示全部帖子]

Dim e As FormEventArgs = Args(0)
Dim split As WinForm.SplitContainer
Dim pnl,pnl1 As WinForm.Panel
With e.form
    ' 创建split分隔
    split = .CreateControl("split1", ControlTypeEnum.splitcontainer)
    split.Dock = Windows.Forms.DockStyle.Fill
    split.Orientation = 0
    split.splitterwidth = 1
    split.backcolor= Color.FromARGB(192,192,192)
    split.IsSplitterFixed = False   
    e.form.addcontrol(split)
    split.SplitterDistance = 100

    '创建panel工具栏
    pnl = .CreateControl("pnl1", ControlTypeEnum.panel)
    pnl.Dock = Windows.Forms.DockStyle.Fill
    split.panel1.AddControl(pnl)
    pnl.Topmost = True
   '创建第二个Panel
    pnl1 = .CreateControl("pnl1", ControlTypeEnum.panel)
    pnl1.Dock = Windows.Forms.DockStyle.Fill
    split.panel2.AddControl(pnl1)
    pnl1.Topmost = True
End With

---------函数写在窗口加载事件中生成上面的控件。

现在我想加用函数向生成的pnl,pnl1
生成一个LABEL在Pnl
生成一个botton在pnl1
我该如何在另外的函数向这个函数生成的容器指定对象呢。



 回到顶部
帅哥哟,离线,有人找我吗?
狐来狐去
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:66 积分:505 威望:0 精华:0 注册:2012/3/14 19:38:00
  发帖心情 Post By:2012/6/4 19:55:00 [显示全部帖子]

狐爸能不能帮着写写看。函数的传递我不太熟悉。
试了几下好像都没办法指定对象。
[此贴子已经被作者于2012-6-4 19:55:23编辑过]

 回到顶部