詳細(xì)剖析VB.NET動態(tài)控件數(shù)組實現(xiàn)方法
VB.NET編程語言幫助廣大開發(fā)人員輕松的實現(xiàn)了許多功能需求。比如平臺的提供,對移動設(shè)備的操作等等。我們在實際應(yīng)用中,其中有些方法還是相對于恰語言較為麻煩的。比如數(shù)組的操作等等。#t#
VB.NET動態(tài)控件數(shù)組在VB里面easy到極致,可是在VB.NET里面卻有點讓人摸不著頭腦。
其實也很簡單,因為VB.NET和VB不同拉,來看看VB.NET的動態(tài)控件數(shù)組如何實現(xiàn)。
1、在form的頭部定義一個公共的ArrayList類型的變量
Dim m_items As New ArrayList
2、在程序中動態(tài)生成控件
- while (a<b)
- dim lblControl as Label= new Label
- lblControl .Text="你好"
- lblControl .dock=......top
- lblControl .autosize=false.
- ....
- me.controls.add(lblControl )
- '把動態(tài)產(chǎn)生的控件放到對應(yīng)的區(qū)域
- '下面這個地方注意拉,
- m_items.Add(lblControl )
- '把這個label放到前面第一步定義
的ArrayList中去- AddHandler label.Click,
AddressOf LblControlArrayClick
'給這組動態(tài)控件定義click事件的觸發(fā)函數(shù)
LblControlArrayClick 。- end while
3、定義LblControlArrayClick 的click事件的觸發(fā)函數(shù),這個是和VB不同的地方的關(guān)鍵所在拉。
- '控件數(shù)組事件
- Private Sub LblControlArrayClick
(ByVal sender As Object, ByVal e
As EventArgs)- Dim lblText As String
- lblText = CType(sender, Label).Text
'這里CType就是將觸發(fā)事件的對象還
原為Label對象,- '有點像java里面的集合阿,放進去后再
取出來的時候,要造型一下。- msgbox ("所電擊的動態(tài)控件的文字是:" & lblText)
- end sub
好啦,VB.NET動態(tài)控件數(shù)組的內(nèi)容就是這么簡單。
如果你要為VB.NET動態(tài)控件數(shù)組定義其他的觸發(fā)事件,只要修改對應(yīng)的觸發(fā)就可以了。