建站
咨詢
售后
建站咨詢
新聞中心
VB.NET的功能非常強大，可以實現(xiàn)代碼的托管，以及強化代碼架構(gòu)，為程序員帶來一個安全性較強的開發(fā)環(huán)境。我們在這里首先創(chuàng)建一個Button類型的VB.NET控件數(shù)組，來解釋一下相關(guān)知識點。#t#
創(chuàng)新互聯(lián)從2013年創(chuàng)立，是專業(yè)互聯(lián)網(wǎng)技術(shù)服務(wù)公司，擁有項目成都做網(wǎng)站、成都網(wǎng)站制作網(wǎng)站策劃，項目實施與項目整合能力。我們以讓每一個夢想脫穎而出為使命，1280元越秀做網(wǎng)站,已為上家服務(wù),為越秀各地企業(yè)和個人服務(wù),聯(lián)系電話:028-86922220
1、創(chuàng)建“Windows應(yīng)用程序”類型的工程，添加名為ButtonArray的類，并使該類繼承 System.Collection.CollectionBase 類。System.Collections.CollectionBase類是.NET框架類庫中為集合操作提供抽象的基類，通過對它的繼承可以為我們的ButtonArray類具備集合增加、刪除、索引的功能。
2、為ButtonArray類添加ParentForm屬性，即控件組所在窗體，創(chuàng)建初始化函數(shù)（構(gòu)造函數(shù)）；
3、為控件數(shù)組類增加AddItem方法，該方法在控件數(shù)組類中添加成員；
4、為控件數(shù)組類增加RemoveItem方法，該方法在控件數(shù)組中刪除一個成員。
VB.NET控件數(shù)組創(chuàng)建的示例代碼：
- Public Class ButtonArray
- Inherits System.Collections.
CollectionBase - Private ReadOnly ParentForm
As System.Windows.Forms.Form - Public 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.Button- Get
- Return Me.List.Item(index)
' ButtonArray的List 屬性從
CollectionBase 繼承- End Get
- End Property
- Public Sub AddItem()
- Dim btnItem As New System.
Windows.Forms.Button- Me.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.ToString- AddHandler 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)- '在這里編寫控件數(shù)組對點擊事件的響應(yīng)
- '例如：
- MsgBox("點擊：" & sender.GetType().
ToString & CType(CType(sender,
Button).Tag, String))- End Sub
- End Class
VB.NET控件數(shù)組的創(chuàng)建方法就為大家介紹到這里。
當(dāng)前名稱：VB.NET控件數(shù)組使用經(jīng)驗詳細(xì)分析
網(wǎng)頁路徑：http://fisionsoft.com.cn/article/dpsepgd.html
