您好,登錄后才能下訂單哦!
VB.NET中的動(dòng)態(tài)代碼生成技巧是什么,很多新手對(duì)此不是很清楚,為了幫助大家解決這個(gè)難題,下面小編將為大家詳細(xì)講解,有這方面需求的人可以來學(xué)習(xí)下,希望你能有所收獲。
這里的討論也將著眼于這兩種情況。首先是當(dāng)程序員需要?jiǎng)討B(tài)建立一個(gè)控件并將代碼附著于控件之上時(shí)。例如,你或許想創(chuàng)建一個(gè)鏈接列表,但是不知道需要?jiǎng)?chuàng)建鏈接的數(shù)量或是鏈接中會(huì)出現(xiàn)什么樣的數(shù)據(jù)。第二種是當(dāng)程序員需要定義代碼以反映出特殊需求的時(shí)候。例如,你或許要執(zhí)行能反映用戶系統(tǒng)配置的代碼。
類似上述的情況當(dāng)然不會(huì)每天都上演。事實(shí)上,它們只在非常情況下才出現(xiàn)。然而,作為程序員,仍然要意識(shí)到.NET為解決動(dòng)態(tài)情形提供了方案。有了正確的技巧,你就可以寫出能靈活處理動(dòng)態(tài)情況的應(yīng)用程序了。
使用動(dòng)態(tài)控件
許多程序員總會(huì)遇到需要?jiǎng)討B(tài)創(chuàng)建控件的時(shí)候。我們所展示的例子中程序員向FlowLayoutPanel中添加了LinkLabels。或許你可以個(gè)這樣的設(shè)置來記錄和保存常用的URL,文件,網(wǎng)絡(luò)地址或是其他資源所在位置的數(shù)值。這一示例沒有真正保存鏈接,但是你可以使用XML序列化功能來實(shí)現(xiàn)保存。
每次當(dāng)用戶點(diǎn)擊Test按鈕時(shí),示例代碼就會(huì)動(dòng)態(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)行訪問。
請(qǐng)注意該代碼也向鏈接的Click事件中指定了一個(gè)處理程序。你必須使用示例中的AddHandler技巧,因?yàn)槠胀ǖ腍andles關(guān)鍵詞路徑不起作用。一方面,設(shè)計(jì)應(yīng)用程序的時(shí)候你并不清楚控件的名稱。即便你為控件指定了一個(gè)名稱,你也不知道用戶要?jiǎng)?chuàng)建的控件數(shù)量,所以我們沒有辦法清楚會(huì)有多少處理程序會(huì)被創(chuàng)建。處理程序的代碼與控件代碼類似,因此沒有必要?jiǎng)?chuàng)建多個(gè)處理程序。用于這個(gè)示例的處理代碼見例二。例二:處理動(dòng)態(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è)事件處理器來動(dòng)態(tài)創(chuàng)建控件時(shí),通常你需要將ByVal發(fā)送器作為System.Object參數(shù),這意味著將這兩者都包含其中。
有些程序員在創(chuàng)建事件處理器的時(shí)候會(huì)出現(xiàn)一個(gè)錯(cuò)誤,即沒有檢查傳入控件的類型。發(fā)送器對(duì)象可能包含多選擇,而如果未對(duì)事件處理器進(jìn)行事件處理類型的設(shè)置,那么你就會(huì)面臨更多的選擇。我們的示例代碼一開始就檢查了傳入控件對(duì)象的類型。這樣以來發(fā)送器就不會(huì)像下面所展示的代碼一樣:
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)行互動(dòng)。在我們的示例中,只顯示了一個(gè)能在創(chuàng)建鏈接的時(shí)候告知我們的對(duì)話框。
使用動(dòng)態(tài)代碼
在運(yùn)行時(shí)創(chuàng)建一個(gè)控件是在無法確定應(yīng)用程序功能的時(shí)候采取的一種策略。但是動(dòng)態(tài)創(chuàng)建控件并不適用于所有的情況。有些時(shí)候你必須建立可執(zhí)行代碼,雖然你的應(yīng)用程序運(yùn)行的目的是補(bǔ)償不同極其之間的配置,不同用戶的需求,不同的環(huán)境需求或是其他要求。當(dāng)應(yīng)用程序所運(yùn)行的電腦不存在控件,那么通常是需要?jiǎng)?chuàng)建動(dòng)態(tài)代碼的。
幸運(yùn)的是,.NET為我們提供了一系列動(dòng)態(tài)代碼選項(xiàng)。例如,你可以創(chuàng)建一個(gè)可執(zhí)行的能獨(dú)立運(yùn)行的程序或是可以想運(yùn)行中的程序加載一個(gè)DLL然后再執(zhí)行。當(dāng)你需要演示一個(gè)外部任務(wù)的時(shí)候可以使用選擇可執(zhí)行,如運(yùn)行一種腳本——該DLL選項(xiàng)最適合擴(kuò)大現(xiàn)有的應(yīng)用程序功能。
你可以運(yùn)行來自文件或內(nèi)存的動(dòng)態(tài)代碼。當(dāng)你需要不止一次地運(yùn)行代碼時(shí),可以使用文件。對(duì)代碼的檢查可以再次運(yùn)行外部文件而不需要對(duì)其進(jìn)行二次編譯。當(dāng)你需要多次演示任務(wù)的時(shí)候,如一個(gè)安裝請(qǐng)求,那可以使用內(nèi)存圖像。
當(dāng)然我們也可以更改源代碼。例如,你可以使用字符串來建立需要在應(yīng)用程序中直接使用的代碼。如果你需要代碼具有高度靈活性,且代碼本身不是很長時(shí),這一方法的優(yōu)勢(shì)就非常顯著。也可以從文件里建立代碼,就如同VS一樣。這一方法最適用于相對(duì)穩(wěn)定且不需要復(fù)雜編碼的需求。第三種選擇是使用Documentation Object Model來創(chuàng)建代碼并將其作為CodeDom樹型結(jié)構(gòu)的一個(gè)系列。該樹型結(jié)構(gòu)包括了CodeCormpileUnits。這就像是用DOM模式創(chuàng)建了一個(gè)XML文件。
使用動(dòng)態(tài)創(chuàng)建代碼的***方式是用示例來檢查一下。例三展示了一個(gè)基本“Hello World”示例。該示例用源代碼直接創(chuàng)建了代碼因此你可以看到整個(gè)運(yùn)行以及生成一個(gè)外部可執(zhí)行文件的過程。
例三:動(dòng)態(tài)編碼示例
Private Sub btnTest3_Click() Handles btnTest3.Click ' Create a compiler. Dim Comp As VBCodeProvider = New VBCodeProvider() ' Define the parameters for the code you want to compile. Dim Parms As CompilerParameters = New CompilerParameters) ' We do want to create an executable, rather than a DLL. Parms.GenerateExecutable = True ' The compiler will create an output assembly called Output. Parms.OutputAssembly = "Output" ' The compiler won't treat warnings as errors. Parms.TreatWarningsAsErrors = False ' Add any assembly you want to reference. Parms.ReferencedAssemblies.Add("System.Windows.Forms.dll") ' Define the code you want to run. Dim SampleCode As StringBuilder = New StringBuilder() SampleCode.Append("Imports System.Windows.Forms" + vbCrLf) SampleCode.Append("Module TestAssembly" + vbCrLf) SampleCode.Append("Sub Main()" + vbCrLf) SampleCode.Append("MessageBox.Show(" + Chr(34) + _ "Dynamically Created Code!" + _Chr(34) + ")" + vbCrLf) SampleCode.Append("End Sub" + vbCrLf) SampleCode.Append("End Module" + vbCrLf) ' Define the code to run. Dim Executable As CompilerResults = _ Comp.CompileAssemblyFromSource(Parms, SampleCode.ToString()) ' Display error messages if there are any. If Executable.Errors.HasErrors Then For Each Item As CompilerError In Executable.Errors MessageBox.Show(Item.ErrorText) Next Else ' If there aren't any error messages, start the ' executable. Process.Start("Output") End If End Sub
一開始你創(chuàng)建了一個(gè)使用VBCodeProvider的編譯器Comp。舊一點(diǎn)的.NET版本使用的是不同的方法但是這里所講的是微軟推薦的一個(gè)新方法。
為了使用編譯器,你必須創(chuàng)建能描述應(yīng)用程序的參數(shù)。這些參數(shù)類似于VS中你創(chuàng)建的參數(shù),只是現(xiàn)在你可以對(duì)它們進(jìn)行定義。該代碼一開始就將GenerateExecutable設(shè)置為True,這意味著你需要的是一個(gè)EXE文件而不是DLL。
Parms.OutputAssembly屬性包含了輸出文件的名稱。你只需要在想創(chuàng)建文件時(shí)提供這一信息即可,而不需要生成可執(zhí)行內(nèi)存了。如果你ixiang生成可執(zhí)行文件的內(nèi)存版本,可以將Parm.GenerateInMemory屬性設(shè)置為True。
使用Parm.TreatWarningsAsErrors屬性來確定如何處理警告信息。默認(rèn)的設(shè)置會(huì)使其為錯(cuò)誤,這意味著你的應(yīng)用程序可能無法對(duì)其進(jìn)行編譯。大多數(shù)程序員使用默認(rèn)設(shè)置,盡管他們開發(fā)了程序,但是在開發(fā)完成的程序中卻將其設(shè)置為False。
大多數(shù)應(yīng)用程序需要外部DLL以正常運(yùn)行。當(dāng)然,你不能創(chuàng)建任意的沒有引用外部DLL的Windows表單程序。通常,你要使用Reference文件夾來完成這一任務(wù)。不過,當(dāng)你動(dòng)態(tài)創(chuàng)建代碼的時(shí)候可以依賴于Parms.ReferencedAssemblies屬性。如下所示,只需添加你要的DLL即可。
現(xiàn)在,你已經(jīng)定義了項(xiàng)目,接下來需要為其創(chuàng)建源代碼。如前文所述,你可以依賴于一個(gè)外部文件或DOM模式。然后,該示例創(chuàng)建了代碼因此你可以看到整個(gè)過程。下面是代碼的原始形式:
Imports System.Windows.Forms Module TestAssembly Sub Main() MessageBox.Show("Dynamically Created Code!") End Sub End Module
這個(gè)簡(jiǎn)單的例子顯示了一個(gè)對(duì)話框。注意vbCrLf的使用。如果你不使用這一方法,那編譯器會(huì)發(fā)送給你一個(gè)錯(cuò)誤信息。vbCrLf條目在該代碼中所起的作用與在程序代碼中的作用相同,只是添加的方式不一樣。
從這一點(diǎn)老說,你***會(huì)用Comp.CompileAsseblyFromSource()方法編譯代碼。當(dāng)使用DOM模式和文件的時(shí)候可以使用這一方法。而在所有三種情況中,編譯器用參數(shù)和源代碼創(chuàng)建了你請(qǐng)求的輸出。該運(yùn)算的輸出出現(xiàn)在Executable中,是CompilerResults類型。
編譯的失敗次數(shù)多于程序員的預(yù)計(jì)。無論你是在哪里使用動(dòng)態(tài)編碼技巧,你必須假設(shè)會(huì)出現(xiàn)失敗的情況以及處理失敗的方案。在本例中,代碼尋找的是錯(cuò)誤并在編譯失敗時(shí)將其展示在了信息框中。否則,代碼會(huì)依賴于Process.Start()方法來啟用可執(zhí)行文件。
底線
動(dòng)態(tài)編碼技巧并不是***鑰匙。當(dāng)你為開發(fā)問題找到了好的靜態(tài)解決方案時(shí),當(dāng)然也可以使用。但是在我們所列出的情況中沒有可行的靜態(tài)方案,因此要選擇動(dòng)態(tài)編碼技巧。大多數(shù)情況下,要用動(dòng)態(tài)編碼技巧解決以下問題:
◆ 用戶的環(huán)境會(huì)以不可預(yù)見的方式更改時(shí);
◆ 無法控制用戶電腦的安裝;
◆ 用戶或應(yīng)用程序都添加了你要用控件執(zhí)行的數(shù)據(jù)要素;
◆ 應(yīng)用程序必須執(zhí)行很早以前的安裝任務(wù),且這些任務(wù)與電腦,環(huán)境,網(wǎng)絡(luò)或其他不確定因素聯(lián)系緊密時(shí);
◆ 應(yīng)用程序要執(zhí)行了處理級(jí)別的任務(wù),且這些任務(wù)取決于機(jī)器連接或其他狀況。
顯然,還有其他一些情況能使用動(dòng)態(tài)編碼技巧。最重要的是記住但凡有不可預(yù)知的情況下要考慮使用動(dòng)態(tài)編碼技巧。通常在編碼環(huán)境中出現(xiàn)了靜態(tài)代碼無法處理的情況時(shí),我們就可以使用動(dòng)態(tài)編碼技巧。
看完上述內(nèi)容是否對(duì)您有幫助呢?如果還想對(duì)相關(guān)知識(shí)有進(jìn)一步的了解或閱讀更多相關(guān)文章,請(qǐng)關(guān)注億速云行業(yè)資訊頻道,感謝您對(duì)億速云的支持。
免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如果涉及侵權(quán)請(qǐng)聯(lián)系站長郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。