以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [分享]窗口中加入工具条函数  (http://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
--  
谢谢