Tenho um form no meu sistema que mostra as informações do sistema, incluse a versão do exe e uso seguinte codigo:
labelinfo.Caption = "Versão: " & App.Major & "." & App.Minor & "." & App.Revision _
& vbCrLf & "Compilado em " & Mid(FileDateTime(App.Path & "" & App.Title & ".exe"), 1, 10) & " às " & Mid(FileDateTime(App.Path & "" & App.Title & ".exe"), 11, 8) _
& vbCrLf & "Tamanho do Arquivo: " & Format((FileLen(App.Path & "" & App.Title & ".exe") / 1024), "###") & " KB" _
Mas a Versão não esta Atualizando mantem sempre 1.0.0 se alguem souber a falha no codigo eu agradeceria.