VB.NET的应用方式灵活简单,能够帮助开发人员轻松的实现各种功能需求。在这里为大家介绍的VB.NET关于对话框的实现,就可以帮助大家轻松的了解这一语言的相关应用技巧,方便大家解读。
本文将利用VB.NET关于对话框的制作,用来动态显示你的程序版本信息,这时你也许会想到利用System.Reflection类来得到这些动态信息,但实际上要实现这个功能你并不需要编辑复杂的代码。在程序A中包括了一个代码实例。
程序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
这个VB.NET关于对话框的代码实例的运行结果类似于图1。
在这个VB.NET关于对话框例子中,我通过利用System.Reflection类来获得必要的应用程序信息。同时我也通过利用System.Windows.Forms.Application这个类来直接地获得其他额外信息。
这里我定义了一个字符串变量strAbout来存放将要显示的应用程序信息。同时我还定义了其它两个变量:exeApp 作为 System.Reflection.Assembly的变量 与exeName作为 System.Reflection.AssemblyName的变量。
变量exeApp是被用来获得集合的名字。然后,我将exeName变量(名字、版本、代码语言),ProductName(产品名字)和(CompanyName)公司名字这些信息结合到一起,其中,ProductName(产品名字)和(CompanyName)公司名字是利用System.Windows.Forms.Application这个类的属性得到的。
本文适合初学者阅读,希望高手们进行讨论!
【编辑推荐】