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控件数组创建的示例代码:
Public Class ButtonArray
Inherits System.Collections.
CollectionBasePrivate ReadOnly ParentForm
As System.Windows.Forms.FormPublic Sub New(ByVal pForm
As System.Windows.Forms.Form)ParentForm = pForm
End Sub
Default Public ReadOnly Property Item
(ByVal index As Integer) As System.
Windows.Forms.ButtonGet
Return Me.List.Item(index)
' ButtonArray的List 属性从
CollectionBase 继承End Get
End Property
Public Sub AddItem()
Dim btnItem As New System.
Windows.Forms.ButtonMe.List.Add(btnItem)
ParentForm.Controls.Add
(btnItem) '向窗体中增加控件btnItem.Tag = Me.Count
'Count属性从CollectionBase 继承btnItem.Top = Me.Count * 30
btnItem.Left = 200
btnItem.Text = "Button"
& Me.Count.ToStringAddHandler btnItem.Click,
AddressOf btnItem_Click
'绑定事件处理程序End Sub
Public Sub AddItem(ByVal btnItem
As System.Windows.Forms.Button)Me.List.Add(btnItem)
AddHandler btnItem.Click,
AddressOf btnItem_Click
'绑定事件处理程序End Sub
Public Sub RemoveItem()
If Me.Count > 0 Then
ParentForm.Controls.Remove
(Me(Me.Count - 1))Me.List.RemoveAt(Me.Count - 1)
End If
End Sub
Public Sub btnItem_Click
(ByVal sender As Object,
ByVal e As System.EventArgs)'在这里编写控件数组对点击事件的响应
'例如:
MsgBox("点击:" & sender.GetType().
ToString & CType(CType(sender,
Button).Tag, String))End Sub
End Class
以上是“VB.NET控件数组怎么用”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!
新闻名称:VB.NET控件数组怎么用
文章链接:http://myzitong.com/article/gshdgo.html