Vb.net App-Won'；不显示气球顶端

我正在VS2017中编写一个VB.NET应用程序，在Windows 10上运行。我希望主（也是唯一）表单最小化为系统托盘图标。我的那部分很好用。下一部分，显示气球提示弹出通知（例如，“应用程序仍在运行”），根本不起作用

我已经检查/记录了以下内容：

• NotifyIcon

  对象在设计器网格中以及表单的vb.net代码中都为其分配了一个图标，其关联的

  balloottipicon

  成员/属性也是如此
• 机器上的组策略似乎不禁止使用气球提示
• 气泡提示在注册表中似乎未被禁用
• 该程序在Windows 8.1 Pro中按预期工作，并显示气球提示，但在Windows 10 Enterprise N 2016 LTSB中不工作

该计算机位于正在进行组策略管理的域中，但是在我的计算机上找到的结果策略集似乎并不表示气球提示已被禁用

从StackOverflow复制和粘贴精确代码无效。问题一定出在系统本身

这是代码（适用于W8.1，但不适用于W10）：

我还能去哪里看

---

所以我爱上了书中最古老的把戏之一。在修改一个注册表项后，我需要完全重新启动

因此，对我来说，在Windows 10中显示气球提示需要以下几点：

打开regedit.exe

导航至

HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced

设置（或添加）

启用BalloodTips

（如REG_DWORD）并将值设置为

1

重新启动

---

瞧。问题已解决。

我发现，即使我在代码中声明了图标，我也必须首先在notifyIcon1.icon属性中添加一个图标。

您如何知道这实际上是一个系统问题而不是代码问题？进行了哪些测试？这里还讨论了两个完全不同的名称空间和对象；通知图标吐司。根据您的代码块，您只是在使用notifyicon…我阅读的文档表明Windows 10将BallootTip“替换”为Toast，因此对BallootTip的调用将产生Toast。也许我误解了。但正如我在问题中所说，该代码在Windows8.1中运行良好；然而，在Windows 10中，当调用

showBallootTip

方法时，迄今为止我发现的任何选项的配置都没有在屏幕上产生任何结果。也就是说，我发现的所有关于禁用气球提示的W10设置都没有设置为这样做。所以我很难理解为什么它们没有显示。您的目标是什么框架？4.6.1，代码符合MSDN中概述的用法，仅供参考，GPO项目

用户配置
管理模板
开始菜单和任务栏
>
禁用将气球通知显示为祝酒词
需要设置为
启用
如果您已禁用通知中心或其他在设置应用程序中发送通知的应用程序，否则什么也不会出现。
Private Sub frmMain_Resize(sender As Object, e As EventArgs) Handles Me.Resize

    Try

        If Me.WindowState = FormWindowState.Minimized Then

            NotifyIcon1.Visible = True
            NotifyIcon1.Icon = SystemIcons.Application
            NotifyIcon1.BalloonTipIcon = ToolTipIcon.Info
            NotifyIcon1.BalloonTipTitle = "App Title"
            NotifyIcon1.BalloonTipText = "The App is still open!"
            NotifyIcon1.ShowBalloonTip(50000)
            ShowInTaskbar = False

        End If

    Catch ex As Exception

        ErrorHandler(ex)

    End Try

End Sub