日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時(shí)間：8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營(yíng)銷解決方案
如何快速掌握VB.NET控件數(shù)組

本人很喜歡VB.NET控件數(shù)組，在工作中也很喜歡總結(jié)關(guān)于VB.NET控件數(shù)組的經(jīng)驗(yàn)教訓(xùn)，下面就這個(gè)問題來詳細(xì)說說吧。

創(chuàng)新互聯(lián)建站網(wǎng)站建設(shè)由有經(jīng)驗(yàn)的網(wǎng)站設(shè)計(jì)師、開發(fā)人員和項(xiàng)目經(jīng)理組成的專業(yè)建站團(tuán)隊(duì)，負(fù)責(zé)網(wǎng)站視覺設(shè)計(jì)、用戶體驗(yàn)優(yōu)化、交互設(shè)計(jì)和前端開發(fā)等方面的工作，以確保網(wǎng)站外觀精美、網(wǎng)站設(shè)計(jì)、成都做網(wǎng)站易于使用并且具有良好的響應(yīng)性。

一、關(guān)于VB.NET控件數(shù)組

控件數(shù)組”是VB6中一項(xiàng)簡(jiǎn)單而實(shí)用的技術(shù)，通過對(duì)控件的簡(jiǎn)單拷貝、復(fù)制，開發(fā)者可以指定一組控件，這些控件具有相同的類型和名稱，共享事件集。使用控件數(shù)組可以：
1、允許多個(gè)控件共享同一個(gè)事件句柄；
2、提供了運(yùn)行期間增加一個(gè)控件的機(jī)制；
3、提供了一種方便的組合控件的方法。

VB.NET控件數(shù)組的創(chuàng)建不再通過VB6中設(shè)計(jì)時(shí)對(duì)控件的簡(jiǎn)單拷貝、復(fù)制而實(shí)現(xiàn)。VB .NET 的事件模型允許任何事件處理程序處理來自多個(gè)控件的事件，這使我們能夠編程創(chuàng)建屬于不同類型但共享相同事件的控件組。

二、創(chuàng)建VB.NET控件數(shù)組

下面我們創(chuàng)建一個(gè)Button類型控件數(shù)組：
1、創(chuàng)建“Windows應(yīng)用程序”類型的工程，添加名為ButtonArray的類，并使該類繼承 System.Collection.CollectionBase 類。System.Collections.CollectionBase類是.NET框架類庫中為集合操作提供抽象的基類，通過對(duì)它的繼承可以為我們的 ButtonArray類具備集合增加、刪除、索引的功能。
2、為ButtonArray類添加ParentForm屬性，即控件組所在窗體，創(chuàng)建初始化函數(shù)（構(gòu)造函數(shù)）；
3、為控件數(shù)組類增加AddItem方法，該方法在控件數(shù)組類中添加成員；
4、為控件數(shù)組類增加RemoveItem方法，該方法在控件數(shù)組中刪除一個(gè)成員。

 
 
 
    
  
  
  
  1. Public Class ButtonArray 
    2. 
  
  
  
  2. Inherits System.Collections.CollectionBase 
    3. 
  
  
  
  3. Private ReadOnly ParentForm As System.Windows.Forms.Form 
    4. 
  
  
  
  4. 
  
  
  
  5. Public Sub New(ByVal pForm As System.Windows.Forms.Form) 
    6. 
  
  
  
  6. ParentForm = pForm
    7. 
  
  
  
  7. End Sub 
    8. 
  
  
  
  8. 
  
  
  
  9. Default Public ReadOnly Property Item(ByVal index As Integer) 
    As System.Windows.Forms.Button 
    10. 
  
  
  
  10. Get 
    11. 
  
  
  
  11. Return Me.List.Item(index)  
    12. 
  
  
  
  12. 'ButtonArray的List 屬性從CollectionBase 繼承 
    13. 
  
  
  
  13. End Get 
    14. 
  
  
  
  14. End Property 
    15. 
  
  
  
  15. 
  
  
  
  16. Public Sub AddItem() 
    17. 
  
  
  
  17. Dim btnItem As New System.Windows.Forms.Button() 
    18. 
  
  
  
  18. Me.List.Add(btnItem) 
    19. 
  
  
  
  19. ParentForm.Controls.Add(btnItem) 
    20. 
  
  
  
  20. '向窗體中增加控件 
    21. 
  
  
  
  21. btnItem.Tag = Me.Count'Count屬性從CollectionBase 繼承 
    22. 
  
  
  
  22. btnItem.Top = Me.Count * 30 
    23. 
  
  
  
  23. btnItem.Left = 200
    24. 
  
  
  
  24. btnItem.Text = "Button" & Me.Count.ToString 
    25. 
  
  
  
  25. AddHandler btnItem.Click, AddressOf btnItem_Click  
    26. 
  
  
  
  26. '綁定事件處理程序 
    27. 
  
  
  
  27. End Sub 
    28. 
  
  
  
  28. 
  
  
  
  29. Public Sub RemoveItem() 
    30. 
  
  
  
  30. If Me.Count > 0 Then 
    31. 
  
  
  
  31. ParentForm.Controls.Remove(Me(Me.Count - 1)) 
    32. 
  
  
  
  32. Me.List.RemoveAt(Me.Count - 1) 
    33. 
  
  
  
  33. End If 
    34. 
  
  
  
  34. End Sub 
    35. 
  
  
  
  35. 
  
  
  
  36. Public Sub btnItem_Click(ByVal sender As Object, 
    ByVal e As System.EventArgs) 
    37. 
  
  
  
  37. '在這里編寫控件數(shù)組對(duì)點(diǎn)擊事件的響應(yīng) 
    38. 
  
  
  
  38. '例如： 
    39. 
  
  
  
  39. MsgBox("點(diǎn)擊：" & sender.GetType().ToString & 
    CType(CType(sender, Button).Tag, String)) 
    40. 
  
  
  
  40. End Sub 
    41. 
  
  
  
  41. End Class
    42.

網(wǎng)站欄目：如何快速掌握VB.NET控件數(shù)組
標(biāo)題鏈接：http://www.5511xx.com/article/dhheise.html