vb net控件数组正确使用方法分析

《vb net控件数组正确使用方法分析》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、VBNET控件数组正确使用方法分析VB.NET控件数组正确使用方法分析2010-05-0813：16VB.NET编程语言的出现，为开发人员带来了非常大的好处。我们今天将会学到其中一个比较重要的知识点，VB.NET控件数组的相关知识。VB.NET控件数组是位于一个窗体上共享同一名称的一组同种类型控件。普通控件仅使用名称就可以识别，而引用控件数组中的成员则需要同时使用名称和索引。开发人员在VisualBasic6.0以及更早的版本中使用控件数组主要有以下三个理由：1.在循环中访问数组中控件的属性。2.向窗体动态添加新控件。3.允许一个事件例程与多个控件连

2、接。VB.NET控件数组的使用，极大的方便了开发人员。然而，刚刚从VisualBasic6.0(以下简称VB6.0)过渡到VisualBasic.Net(以下简称VB.NET)的初学者却发现，在VB.NET中似乎不能使用控件数组了。笔者仔细查阅了VB.NET的MSDN文档发现，在VB.NET中，确实不再支持控件数组。原因是，VB.NET对事件模型作了很大的改动，引入了另外一种数据类型――控件集合模型，使控件数组没有存在的必要。就像VB6.0中的控件数组可以共享事件一样，VB.NET中的事件模型允许任何事件处理程序都可以处理来自多个控件的事件，这就允许

3、创建属于不同类型但共享相同事件的控件组。所谓控件集合是指包含在一个容器中的所有控件的总和，能够创建控件集合的容器有：Form、Panel、GropBox等。程序运行时，可以通过访问容器的Control属性来得到该容器中的所有控件。下面将演示如何通过控件集合来使用控件数组：一、直接使用Form容器的控件集合来使用VB.NET控件数组：建立一个VB.NET项目，在Form1中添加三个TextBox控件，名称分别为：TextBox1、TextBox2、TextBox3，一个Button控件。双击Button，输入如下代码：PrivateSubButton1

4、_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click'下面的语句是通过数组元素的下标来访问Form中的每一个元素。Me.Controls.Item(0).Text="集合中的第一个元素"Me.Controls.Item(1).Text="集合中的第二个元素"Me.Controls.Item(2).Text="集合中的第三个元素"Me.Controls.Item(3).Text="集合中的第四个元素"EndSub运行项目后，点击Button，看到的

5、结果是：Form1中的所有控件(包括Button自己)的Text属性都被修改了，同时还发现，最后加入的的控件变成了集合中的第一个元素(下标为0)。这个结果说明：Form1中的所有控件已经自动构成了一个控件集合(控件数组)，这个特点使得建立控件数组变得非常简单。在访问这些控件时，除了可以通过控件名称直接访问外，还可以通过Contro.Item(n)属性按下标访问集合中的每一个控件；集合中控件的类型可以不相同，这点和VB6.0完全不同；集合中的下标顺序是按照加入控件的顺序倒排的；VB.NET控件数组的特点让人稍感不适的是，控件数组的下标是按加入顺序的倒排

6、续产生的，但程序员完全可以改变这个顺序：在代码编辑窗中点击"#Region"Windows窗体设计器生成的代码"旁边的"+"号，代码展开后，找到如下代码：Me.Controls.Add(Me.Button1)Me.Controls.Add(Me.TextBox3)Me.Controls.Add(Me.TextBox2)Me.Controls.Add(Me.TextBox1)这个代码顺序就是控件数组的下标顺序，只要改变这个顺序就可以改变控件数组中每个以元素的下标。在Form中构成控件数组非常方便，但也有一个小问题：一般来说，Form中的控件往往有很多种

7、，系统建立控件集合的时候将会把其中的所有控件放在同一个集合中，这样一来，程序员在写代码的时候有可能将每一个控件的下标混淆，为了解决这个问题，可以用Panel容器来根据需要将某类控件建立成控件数组，也就避免了上述问题。建立的方法非常简单：只需要在Form中添加一个Panel控件，然后将需要建立VB.NET控件数组的控件加入其中即可，然后用：Panel.Control.Item(n)来访问其中的每一个控件。二、用代码建立控件集合。建立一个VB.NET项目，在Form中添加三个TextBox和一个Button控件，在代码编辑窗口中输入如下代码：DimTex

8、tboxArrayAsNewArrayList'定义一个数组例表PrivateSubBiuldTextBox