在vb.net中创建使用控件数组

《在vb.net中创建使用控件数组》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、在VB.Net中创建使用控件数组>>教育资源库在VB.Net中创建使用控件数组首先创建一个Button类型控件数组：1、创建“e.List.Item(index)'ButtonArray的List属性从CollectionBase继承EndGetEndPropertyPublicSubAddItem()DimbtnItemAsNe.e.List.Add(btnItem)ParentForm.Controls.Add(btnItem)'向窗体中增加控件btnItem.Tag=Me.Count'Count属性从CollectionBase

2、继承btnItem.Top=Me.Count30btnItem.Left=200btnItem.Text="Button"Me.Count.ToStringAddHandlerbtnItem.Click,AddressOfbtnItem_Click'绑定事件处理程序EndSubPublicSubAddItem(ByValbtnItemAsSystem.e.List.Add(btnItem)AddHandlerbtnItem.Click,AddressOfbtnItem_Click'绑定事件处理程序EndSubPublicSubRemo

3、veItem()IfMe.Count>0ThenParentForm.Controls.Remove(Me(Me.Count-1))Me.List.RemoveAt(Me.Count-1)EndIfEndSub>>>这篇文章来自..，。>PublicSubbtnItem_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)'在这里编写控件数组对点击事件的响应'例如：MsgBox("点击："sender.GetType().ToStringCType(CType(sender,Bu

4、tton).Tag,String))EndSubEndClass使用创建的控件数组在Form1中放置两个按钮Button1、Button2，分别测试控件数组的增添、删除。双击Form添加代码：PublicClassForm1InheritsSystem.e.List.Item(index)'ButtonArray的List属性从CollectionBase继承EndGetEndPropertyPublicSubAddItem(ByValbtnItemAsSystem.e.List.Add(btnItem)AddHandlerbtnIt

5、em.Click,AddressOfbtnItem_Click'绑定事件处理程序EndSubPublicSubbtnItem_Click(ByValsenderAsObject,ByValeAsSystem.EventArgs)'在这里编写控件数组对点击事件的响应'例如：MsgBox("点击："sender.GetType().ToStringCType(CType(sender,Label).Tag,String))EndSubEndClass使用创建的Label控件在Form1中放置两个按钮Label1、Label2双击Form添

6、加代码：PublicClassForm1InheritsSystem.#Region"Windows窗体设计器生成的代码"&n上一页123下一页>>>>这篇文章来自..，。bsp;PublicSubNeLabelsAsNe(Me.Label1)Labels.AddItem(Me.Label2)EndSubEndClass然后可以测试点击两个label可以显示相应的Tag的信息。上一页123>>>>这篇文章来自..，。