VB.NET的應(yīng)用方式靈活簡(jiǎn)單，能夠幫助開發(fā)人員輕松的實(shí)現(xiàn)各種功能需求。在這里為大家介紹的VB.NET關(guān)于對(duì)話框的實(shí)現(xiàn)，就可以幫助大家輕松的了解這一語(yǔ)言的相關(guān)應(yīng)用技巧，方便大家解讀。

本文將利用VB.NET關(guān)于對(duì)話框的制作，用來(lái)動(dòng)態(tài)顯示你的程序版本信息，這時(shí)你也許會(huì)想到利用System.Reflection類來(lái)得到這些動(dòng)態(tài)信息，但實(shí)際上要實(shí)現(xiàn)這個(gè)功能你并不需要編輯復(fù)雜的代碼。在程序A中包括了一個(gè)代碼實(shí)例。

程序A:

以下是代碼片段：

Private Sub DynamicAboutBox()   
Dim strAbout As String   
Dim exeApp As System.Reflection.Assembly   
exeApp = System.Reflection.Assembly.GetExecutingAssembly()   
Dim exeName As System.Reflection.AssemblyName   
exeName = exeApp.GetName()   
strAbout = "Application: " & exeName.Name & vbCrLf   
strAboutstrAbout = strAbout & "Version: "   
& exeName.Version.ToString() & vbCrLf   
strAboutstrAbout = strAbout & "Code Base: "   
& exeName.CodeBase & vbCrLf   
strAboutstrAbout = strAbout & "Company: " &   
System.Windows.Forms.Application.CompanyName & vbCrLf   
strAboutstrAbout = strAbout & "Product: " &   
System.Windows.Forms.Application.ProductName & vbCrLf   
MessageBox.Show(strAbout)   
End Sub 

這個(gè)VB.NET關(guān)于對(duì)話框的代碼實(shí)例的運(yùn)行結(jié)果類似于圖1。

在這個(gè)VB.NET關(guān)于對(duì)話框例子中，我通過(guò)利用System.Reflection類來(lái)獲得必要的應(yīng)用程序信息。同時(shí)我也通過(guò)利用System.Windows.Forms.Application這個(gè)類來(lái)直接地獲得其他額外信息。

這里我定義了一個(gè)字符串變量strAbout來(lái)存放將要顯示的應(yīng)用程序信息。同時(shí)我還定義了其它兩個(gè)變量：exeApp 作為 System.Reflection.Assembly的變量 與exeName作為 System.Reflection.AssemblyName的變量。

變量exeApp是被用來(lái)獲得集合的名字。然后，我將exeName變量(名字、版本、代碼語(yǔ)言)，ProductName(產(chǎn)品名字)和(CompanyName)公司名字這些信息結(jié)合到一起，其中，ProductName(產(chǎn)品名字)和(CompanyName)公司名字是利用System.Windows.Forms.Application這個(gè)類的屬性得到的。

本文適合初學(xué)者閱讀，希望高手們進(jìn)行討論！

【編輯推薦】

1. VB.NET和ASP.NET編碼規(guī)范
2. VB.NET實(shí)現(xiàn)圖象文件和XML文件互換
3. VB程序員如何編寫高質(zhì)量的VB代碼
4. .NET程序員是否應(yīng)該放棄VB.NET？
5. 對(duì)VBS腳本在系統(tǒng)安全中幾個(gè)妙用方法的介紹