盤點(diǎn)VB.NET對(duì)話框制作技巧
VB.NET的應(yīng)用方式靈活簡(jiǎn)單,能夠幫助開發(fā)人員輕松的實(shí)現(xiàn)各種功能需求。在這里為大家介紹的VB.NET關(guān)于對(duì)話框的實(shí)現(xiàn),就可以幫助大家輕松的了解這一語言的相關(guān)應(yīng)用技巧,方便大家解讀。
本文將利用VB.NET關(guān)于對(duì)話框的制作,用來動(dòng)態(tài)顯示你的程序版本信息,這時(shí)你也許會(huì)想到利用System.Reflection類來得到這些動(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ì)話框例子中,我通過利用System.Reflection類來獲得必要的應(yīng)用程序信息。同時(shí)我也通過利用System.Windows.Forms.Application這個(gè)類來直接地獲得其他額外信息。
這里我定義了一個(gè)字符串變量strAbout來存放將要顯示的應(yīng)用程序信息。同時(shí)我還定義了其它兩個(gè)變量:exeApp 作為 System.Reflection.Assembly的變量 與exeName作為 System.Reflection.AssemblyName的變量。
變量exeApp是被用來獲得集合的名字。然后,我將exeName變量(名字、版本、代碼語言),ProductName(產(chǎn)品名字)和(CompanyName)公司名字這些信息結(jié)合到一起,其中,ProductName(產(chǎn)品名字)和(CompanyName)公司名字是利用System.Windows.Forms.Application這個(gè)類的屬性得到的。
本文適合初學(xué)者閱讀,希望高手們進(jìn)行討論!
【編輯推薦】