VB.NET動態(tài)控件怎么用

這篇文章主要為大家展示了“VB.NET動態(tài)控件怎么用”，內(nèi)容簡而易懂，條理清晰，希望能夠幫助大家解決疑惑，下面讓小編帶領(lǐng)大家一起研究并學(xué)習(xí)一下“VB.NET動態(tài)控件怎么用”這篇文章吧。

本文的討論也將著眼于這兩種情況。首先是當(dāng)程序員需要?jiǎng)討B(tài)建立一個(gè)控件并將代碼附著于控件之上時(shí)。例如，你或許想創(chuàng)建一個(gè)鏈接列表，但是不知道需要?jiǎng)?chuàng)建鏈接的數(shù)量或是鏈接中會出現(xiàn)什么樣的數(shù)據(jù)。第二種是當(dāng)程序員需要定義代碼以反映出特殊需求的時(shí)候。例如，你或許要執(zhí)行能反映用戶系統(tǒng)配置的代碼。

類似上述的情況當(dāng)然不會每天都上演。事實(shí)上，它們只在非常情況下才出現(xiàn)。然而，作為程序員，仍然要意識到.NET為解決動態(tài)情形提供了方案。有了正確的技巧，你就可以寫出能靈活處理動態(tài)情況的應(yīng)用程序了。

使用VB.NET動態(tài)控件

許多程序員總會遇到需要?jiǎng)?chuàng)建VB.NET動態(tài)控件的時(shí)候。我們所展示的例子中程序員向FlowLayoutPanel中添加了LinkLabels.或許你可以個(gè)這樣的設(shè)置來記錄和保存常用的URL，文件，網(wǎng)絡(luò)地址或是其他資源所在位置的數(shù)值。這一示例沒有真正保存鏈接，但是你可以使用XML序列化功能來實(shí)現(xiàn)保存。

每次當(dāng)用戶點(diǎn)擊Test按鈕時(shí)，示例代碼就會動態(tài)創(chuàng)建一個(gè)新的LinkLabel控件。真正的演示代碼并不復(fù)雜。以下就展示了創(chuàng)建這類控件以及將控件放入FlowLayoutPanel，lstLabel中通常所需要做的一切。

向FlowLayoutPanel中添加新的鏈接

Private Sub btnTest_Click()     Handles btnTest.Click     ' Create a link.     Dim NewLink As LinkLabel = New LinkLabel()     ' Add some properties to it.     NewLink.Text = DateTime.Now     .ToLongTimeString()     ' Set the click event handler.     AddHandler NewLink.Click,     AddressOf NewLink_Click     ' Place the button on the form.     lstLinks.Controls.Add(NewLink)     End Sub

如你所料，該代碼開始的時(shí)候創(chuàng)建了一個(gè)新的LinkLabel并為其賦予了一些值。這一示例使用的是當(dāng)前時(shí)間。你的代碼或許能夠?qū)δ骋徽鎸?shí)資源進(jìn)行訪問。

請注意該代碼也向鏈接的Click事件中指定了一個(gè)處理程序。你必須使用示例中的AddHandler技巧，因?yàn)槠胀ǖ腍andles關(guān)鍵詞路徑不起作用。一方面，設(shè)計(jì)應(yīng)用程序的時(shí)候你并不清楚控件的名稱。即便你為控件指定了一個(gè)名稱，你也不知道用戶要?jiǎng)?chuàng)建的控件數(shù)量，所以我們沒有辦法清楚會有多少處理程序會被創(chuàng)建。處理程序的代碼與控件代碼類似，因此沒有必要?jiǎng)?chuàng)建多個(gè)處理程序。用于這個(gè)示例的處理代碼見例二。例二：處理VB.NET動態(tài)控件點(diǎn)擊事件

Private Sub NewLink_Click( _ ByVal sender As System.Object, ByVal e As System.EventArgs)  ' Verify that you actually have a LinkLabel  If Not sender.GetType() Is GetType(LinkLabel) Then  MessageBox.Show("Wrong control type provided!")  Return  End If  ' Convert the input sender to a Button.  Dim ThisLink As LinkLabel = sender   ' Show that we have the correct button.  MessageBox.Show("You created this link at: " + ThisLink.Text)  End Sub

你可能已經(jīng)注意到例一中的事件處理器使用的是寬松代表——它沒有將ByVal發(fā)送器作為System.Object，也沒有將ByVal e作為System.EventArgs作為參數(shù)因?yàn)樗恍枰@二者。然而，當(dāng)你創(chuàng)建一個(gè)事件處理器來創(chuàng)建VB.NET動態(tài)控件時(shí)，通常你需要將ByVal發(fā)送器作為 System.Object參數(shù)，這意味著將這兩者都包含其中。

有些程序員在創(chuàng)建事件處理器的時(shí)候會出現(xiàn)一個(gè)錯(cuò)誤，即沒有檢查傳入控件的類型。發(fā)送器對象可能包含多選擇，而如果未對事件處理器進(jìn)行事件處理類型的設(shè)置，那么你就會面臨更多的選擇。我們的示例代碼一開始就檢查了傳入控件對象的類型。這樣以來發(fā)送器就不會像下面所展示的代碼一樣：

Private Sub btnTest2_Click() Handles btnTest2.Click   ' Create a link.  Dim NewButton As Button = New Button()  ' Add some properties to it.  NewButton.Text = DateTime.Now.ToLongTimeString()  ' Set the click event handler.  AddHandler NewButton.Click, AddressOf NewLink_Click  ' Place the button on the form.  lstLinks.Controls.Add(NewButton)  End Sub

此代碼在FlowLayoutPanel中創(chuàng)建了一個(gè)按鈕，大多數(shù)情況下這都能正常運(yùn)行，除非事件處理器不按照按鈕所示的進(jìn)行操作。如果你打算服務(wù)多個(gè)控件類型，那么每個(gè)控件類型都需要一個(gè)獨(dú)特的處理。你可以使用多事件處理器或者為某些類型提供選擇標(biāo)準(zhǔn)。

NewLink_Click（）事件處理器照常將傳入發(fā)送器轉(zhuǎn)換成指定類型，在這個(gè)示例中則是LinkLabel.該代碼可以訪問LinkLabel屬性并能用其他方式進(jìn)行互動。在我們的示例中，只顯示了一個(gè)能在創(chuàng)建鏈接的時(shí)候告知我們的對話框。

以上是“VB.NET動態(tài)控件怎么用”這篇文章的所有內(nèi)容，感謝各位的閱讀！相信大家都有了一定的了解，希望分享的內(nèi)容對大家有所幫助，如果還想學(xué)習(xí)更多知識，歡迎關(guān)注億速云行業(yè)資訊頻道！