| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 关于函数的问题。 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=20308) |
| -- 作者：狐来狐去 -- 发布时间：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 我该如何在另外的函数向这个函数生成的容器指定对象呢。 |
| -- 作者：狐狸爸爸 -- 发布时间：2012/6/4 18:29:00 -- 向页面增加控件，参考：
|
| -- 作者：狐来狐去 -- 发布时间：2012/6/4 19:55:00 -- 狐爸能不能帮着写写看。函数的传递我不太熟悉。 试了几下好像都没办法指定对象。
[此贴子已经被作者于2012-6-4 19:55:23编辑过]
|