重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
Dim c As Control
创新互联公司网络公司拥有10年的成都网站开发建设经验,成百上千客户的共同信赖。提供网站设计制作、网站建设、网站开发、网站定制、买友情链接、建网站、网站搭建、响应式网站建设、网页设计师打造企业风格,提供周到的售前咨询和贴心的售后服务
For Each c In Me.Controls
Debug.WriteLine(c.Name ":" TypeName(c))
Next
比方说当前form1上有三个控件, 都是textbox,在读取它们的值的时候,可以通过访问容器的Control属性来得到该容器中的所有控件。最后加入的的控件变成了集合中的第一个元素(下标为0)。
Me.Controls.Item(0).Text = "集合中的第1个元素"
Me.Controls.Item(1).Text = "集合中的第2个元素"
Me.Controls.Item(2).Text = "集合中的第3个元素"
这样可以给以上三个控件的 text属性赋值。同样,如果我们在form1中有个Panel、GroupBox,并且控件是存在于控件中,也可以通过me.panel1.controls.item(?).?的方式对控件进行操作。
可以的,需要判断控件类型并做一下类型转换。
For Each c As Control In Me.Controls
If TypeOf(c) Is TextBox Then
Dim t As TextBox = CType(c ,TextBox)
'调用t的方法即可
End If
Next
form类的GetNextControl() 的方法是用来检索页面控件的。也就是他的作用。
然后可以做些什么?那就要问你自己了。你到底想要实现什么功能呢?我想你可能在试着学习这么类吧。
那我告诉你一个用例吧:
1.比如说页面上很多checkbox ,现在要全选所有的checkbox,那么可以用form的GetNextControl()方法,找到控件,判断类型,若是,则选定它。(只是一个例子,好的程序Checkbox全选应该用javascript来实现)
2.或者修改一些控件的属性,也可以用这个方法来检索。