以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  移除全部控件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=4152)

--  作者:blackzhu
--  发布时间:2009/8/31 21:21:00
--  移除全部控件
移除控件的代码为
  e.Form.Controls("table1").Visible = false 

我想问的是一次性移除全部控件和加载所有控件的代码?
--  作者:blackzhu
--  发布时间:2009/8/31 21:25:00
--  
还有一次指定移除多个控件和加载的代码?
--  作者:yangming
--  发布时间:2009/8/31 21:52:00
--  
好象没有
--  作者:lxl
--  发布时间:2009/8/31 22:17:00
--  

为啥要隐藏所有控件,没啥实际意义吧。

不过可以把所用空间放在panel上面。设置panel的Visible就可以了


--  作者:czy
--  发布时间:2009/8/31 23:10:00
--  
现在来说,lxl的方法应该是个很好的办法。

从代码编辑器的窗口页来看,应该有返回指定窗口所有控件的集合,只是老六不公开而已。
--  作者:blackzhu
--  发布时间:2009/9/1 7:36:00
--  
以下是引用lxl在2009-8-31 22:17:00的发言:

为啥要隐藏所有控件,没啥实际意义吧。

不过可以把所用空间放在panel上面。设置panel的Visible就可以了

  实在不行也只能这样了。我想在一个窗口上做上全部表的窗口,利用目录树切换。像昨日有的狐友提出的那样,昨日做了两表,效果不错,但是比较烦。


--  作者:blackzhu
--  发布时间:2009/9/1 15:01:00
--  
批量移除控件的代码我做出来了,控件名称自己加入:


dim str as string = "Label1|Button1|textbox1"
For Each k as string In str.split("|")
    e.form.Controls(k).Visible = false
Next

--  作者:yangming
--  发布时间:2009/9/1 15:22:00
--  
这样也是麻烦,呵呵
--  作者:程兴刚
--  发布时间:2009/9/1 16:04:00
--  
还可以这样,空间名称统一,仅在后面用序号区别,然后采用循环语句即可!