[浏览完整版]
标题：[分享]窗口中加入工具条函数
1楼
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)
望大家测试，并改良！
以下内容只有回复后才可以浏览
2楼
neha 发表于：2015/1/1 20:28:00kankan
3楼
游 发表于：2015/1/1 21:12:00看看
4楼
游 发表于：2015/1/1 21:18:00
5楼
zyqzyy 发表于：2015/1/1 21:38:00看看
6楼
jswjyjf 发表于：2015/1/1 21:43:00ttttt
7楼
tungwun 发表于：2015/1/1 21:46:00学习
8楼
telek 发表于：2015/1/1 21:49:00hh
9楼
Gryvip 发表于：2015/1/2 1:15:00顶上去看看
10楼
风声 发表于：2015/1/2 8:18:00谢谢