VB.NET關(guān)于對話框制作技巧分享
VB.NET的應(yīng)用方式靈活簡單，能夠幫助開發(fā)人員輕松的實(shí)現(xiàn)各種功能需求。在這里為大家介紹的VB.NET關(guān)于對話框的實(shí)現(xiàn)，就可以幫助大家輕松的了解這一語言的相關(guān)應(yīng)用技巧，方便大家解讀。
本文將利用VB.NET關(guān)于對話框的制作，用來動(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)于對話框的代碼實(shí)例的運(yùn)行結(jié)果類似于圖1。
在這個(gè)VB.NET關(guān)于對話框例子中，我通過利用System.Reflection類來獲得必要的應(yīng)用程序信息。同時(shí)我也通過利用System.Windows.Forms.Application這個(gè)類來直接地獲得其他額外信息。#t#
這里我定義了一個(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è)類的屬性得到的。
