以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  [分享]窗口中加入工具条函数  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=62452)

--  作者：pcxjxjhkw --  发布时间：2015/1/1 16:49:00 --  [分享]窗口中加入工具条函数 \'\'函数名:加入工具条和控件 \'\'用途:在窗口指定容器中动态添加工具条,并在工具条中加入控件 \'\'参数0:要添加的容器 \'\'参数1:要添加的控件，其控件事先加入并写好代码 如：AfterLoad事件 \'\'添加工具条及控件 Dim spl As WinForm.SplitContainer = e.Form.Controls("SplitContainer18") Dim s() As String = {"复选","全选","反选","分隔条","查找:","查找关键词","查找","显示全部","高级查询","分隔条","第一页","上一页","页数","下一页","最末页","分隔条","每页:","每页条数","合计页数"} Functions.Execute("添加工具条及控件",spl.Panel2,s) 望大家测试，并改良！ 以下内容只有回复后才可以浏览

--  作者：neha --  发布时间：2015/1/1 20:28:00 --   kankan

--  作者：游 --  发布时间：2015/1/1 21:12:00 --   看看

--  作者：游 --  发布时间：2015/1/1 21:18:00 --

--  作者：zyqzyy --  发布时间：2015/1/1 21:38:00 --   看看

--  作者：jswjyjf --  发布时间：2015/1/1 21:43:00 --  ttttttt ttttt

--  作者：tungwun --  发布时间：2015/1/1 21:46:00 --  学习 学习

--  作者：telek --  发布时间：2015/1/1 21:49:00 --   hh

--  作者：Gryvip --  发布时间：2015/1/2 1:15:00 --   顶上去看看

--  作者：风声 --  发布时间：2015/1/2 8:18:00 --   谢谢