vb.net如何以编程方式读取项目>道具>发布>发布版本>修订

Question

我想在 VB.NET Windows 应用程序表单标题上显示修订号。

我尝试过 ver = Application.ProductVersion 但只得到：“1.0.6507.29738”

但是，我的项目 > 道具 > 发布 > 发布版本 > 实际上是：
专业 = 1 次要 = 2 构建=0 修订=7

Answer 1

先获取修订版本，然后将其放入标题标签中

    If (System.Deployment.Application.ApplicationDeployment.IsNetworkDeployed) Then
        With System.Deployment.Application.ApplicationDeployment.CurrentDeployment.CurrentVersion
            lbl_title.Text = "Current Version: " & .Major & "." & .Minor & "." & .Build & "." & .Revision
        End With
    End If

注意： 此修订版仅在发布应用程序时才会出现。

Answer 2

这不是答案，而是进一步的问题：该解决方案当时在 .NET 4.8.1 上运行良好。使用.NET 6时有解决方案吗？

.NET 6 似乎不包含 System.Deployment。