VB.NET的應(yīng)用方式靈活簡(jiǎn)單，能夠幫助開(kāi)發(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)直接地獲得其他額外信息。#t#

這里我定義了一個(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è)類的屬性得到的。