VB.NET控件数组怎么用

小编给大家分享一下VB.NET控件数组怎么用，相信大部分人都还不怎么了解，因此分享这篇文章给大家参考一下，希望大家阅读完这篇文章后大有收获，下面让我们一起去了解一下吧！

VB.NET的功能非常强大，可以实现代码的托管，以及强化代码架构，为程序员带来一个安全性较强的开发环境。我们在这里首先创建一个Button类型的VB.NET控件数组，来解释一下相关知识点。

1、创建"Windows应用程序"类型的工程，添加名为ButtonArray的类，并使该类继承 System.Collection.CollectionBase 类。System.Collections.CollectionBase类是.NET框架类库中为集合操作提供抽象的基类，通过对它的继承可以为我们的ButtonArray类具备集合增加、删除、索引的功能。

2、为ButtonArray类添加ParentForm属性，即控件组所在窗体，创建初始化函数（构造函数）；

3、为控件数组类增加AddItem方法，该方法在控件数组类中添加成员；

4、为控件数组类增加RemoveItem方法，该方法在控件数组中删除一个成员。

VB.NET控件数组创建的示例代码：

1. Public Class ButtonArray

2. Inherits System.Collections.
   CollectionBase

3. Private ReadOnly ParentForm
   As System.Windows.Forms.Form

4. Public Sub New(ByVal pForm
   As System.Windows.Forms.Form)

5. ParentForm = pForm

6. End Sub

1. Default Public ReadOnly Property Item
   (ByVal index As Integer) As System.
   Windows.Forms.Button

2. Get

3. Return Me.List.Item(index)
   ' ButtonArray的List 属性从
   CollectionBase 继承

4. End Get

5. End Property

1. Public Sub AddItem()

2. Dim btnItem As New System.
   Windows.Forms.Button

3. Me.List.Add(btnItem)

4. ParentForm.Controls.Add
   (btnItem) '向窗体中增加控件

5. btnItem.Tag = Me.Count
   'Count属性从CollectionBase 继承

6. btnItem.Top = Me.Count * 30

7. btnItem.Left = 200

8. btnItem.Text = "Button"
   & Me.Count.ToString

9. AddHandler btnItem.Click,
   AddressOf btnItem_Click
   '绑定事件处理程序

10. End Sub

1. Public Sub AddItem(ByVal btnItem
   As System.Windows.Forms.Button)

2. Me.List.Add(btnItem)

3. AddHandler btnItem.Click,
   AddressOf btnItem_Click
   '绑定事件处理程序

4. End Sub

5. Public Sub RemoveItem()

6. If Me.Count > 0 Then

7. ParentForm.Controls.Remove
   (Me(Me.Count - 1))

8. Me.List.RemoveAt(Me.Count - 1)

9. End If

10. End Sub

1. Public Sub btnItem_Click
   (ByVal sender As Object,
   ByVal e As System.EventArgs)

2. '在这里编写控件数组对点击事件的响应

3. '例如：

4. MsgBox("点击：" & sender.GetType().
   ToString & CType(CType(sender,
   Button).Tag, String))

5. End Sub

6. End Class

以上是"VB.NET控件数组怎么用"这篇文章的所有内容，感谢各位的阅读！相信大家都有了一定的了解，希望分享的内容对大家有所帮助，如果还想学习更多知识，欢迎关注行业资讯频道！