VB.NET中怎么创建一个控件数组

VB.NET中怎么创建一个控件数组，很多新手对此不是很清楚，为了帮助大家解决这个难题，下面小编将为大家详细讲解，有这方面需求的人可以来学习下，希望你能有所收获。

在VB.NET创建控件数组

首先创建一个Button类型控件数组：

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

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

8. Get

9. Return Me.List.Item(index) @# ButtonArray的List 属性从CollectionBase 继承

10. End Get

11. End Property

12. Public Sub AddItem()

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

14. Me.List.Add(btnItem)

15. ParentForm.Controls.Add(btnItem)@#向窗体中增加控件

16. btnItem.Tag = Me.Count@#Count属性从CollectionBase 继承

17. btnItem.Top = Me.Count * 30

18. btnItem.Left = 200

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

20. AddHandler btnItem.Click, AddressOf btnItem_Click @#绑定事件处理程序

21. End Sub

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

23. Me.List.Add(btnItem)

24. AddHandler btnItem.Click, AddressOf btnItem_Click @#绑定事件处理程序

25. End Sub

26. Public Sub RemoveItem()

27. If Me.Count > 0 Then

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

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

30. End If

31. End Sub

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

33. @#在这里编写控件数组对点击事件的响应

34. @#例如：

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

36. End Sub

37. End Class

看完上述内容是否对您有帮助呢？如果还想对相关知识有进一步的了解或阅读更多相关文章，请关注行业资讯频道，感谢您对的支持。