Ho scritto una sub che fa questo mestiere un po' di tempo fa:
codice:
Public Function GetAssemblyAbout(ByVal InAssembly As Reflection.Assembly) As String
Return InAssembly.GetName.Name & " by " & CType(InAssembly.GetCustomAttributes(GetType(Reflection.AssemblyCompanyAttribute), False)(0), Reflection.AssemblyCompanyAttribute).Company & " - versione " & InAssembly.GetName.Version.ToString
End Function
Ecco un esempio di come richiamarla:
codice:
MessageBox.Show(GetAssemblyAbout(Reflection.Assembly.GetExecutingAssembly), "Informazioni su...", MessageBoxButtons.OK, MessageBoxIcon.Information)