Imports System
Imports Microsoft.VisualBasic
Imports System.Reflection
Module MainClass
Sub Main( )
Dim assem As Assembly = Assembly.GetExecutingAssembly()
Dim assemName As AssemblyName = assem.GetName()
Dim ver As Version = assemName.Version
Console.WriteLine("{0}, Version {1}", assemName.Name, ver.ToString())
End Sub
End Module