En tu projecto VB, en las propiedades tienes las carpetas, General, Generar, Compilar, Componente, Depurar.
En General, lo que pongas en ella, lo puedes acceder desde tu aplicacion.
En Generar, tienes Numero de version e Informacion de version, y en cada etiqueta tipo, puedes colocar algo en la casilla valor.
Desde tu aplicacion, puedes acceder a todos estos valores... un ejemplo...
Private Sub Command1_Click()
msg = Empty
msg = msg & "Comentarios=" & App.Comments & vbLf
msg = msg & "Company Name=" & App.CompanyName & vbLf
msg = msg & "Exe Name =" & App.EXEName & vbLf
msg = msg & "File Description=" & App.FileDescription & vbLf
msg = msg & "Legal Copyright=" & App.LegalCopyright & vbLf
msg = msg & "Legal Trademarks=" & App.LegalTrademarks & vbLf
msg = msg & "Version =" & App.Major & "." & App.Minor & "." & App.Revision & vbLf
msg = msg & "Path=" & App.Path & vbLf
msg = msg & "Previnstance=" & App.PrevInstance & vbLf
msg = msg & "ProductName =" & App.ProductName & vbLf
msg = msg & "Title=" & App.Title & vbLf
msg = msg & "UnattendedApp=" & App.UnattendedApp & vbLf
MsgBox msg, vbInformation, "Informacion APP"
End Sub
