应用程序不会显示气球提示

App Won't Show Balloon Tip

我正在 VS2017 中编写一个 VB.NET 应用程序,到 Windows 10 上的 运行。我希望主(也是唯一)表单最小化为系统托盘图标。那部分我工作得很好。下一部分,显示气球提示弹出通知(例如,"Application is still running"),根本不起作用。

我已经checked/noted以下内容:

该机器所在的域确实进行了组策略管理,但是在我的机器上找到的结果策略集似乎并未表明气球提示已被禁用。

从 Whosebug 复制并粘贴准确的代码无效。那么问题一定出在系统本身。

这是代码(适用于 W8.1 但不适用于 W10):

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

我还能去哪里看?

Cross-posted on SuperUser

事实证明,我爱上了书中最古老的技巧之一。我需要在更改一个注册表项后完全重新启动。

所以,对我来说,让气球提示出现在 Windows10 中需要以下内容:

  1. 打开regedit.exe

  2. 导航到 HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced

  3. 设置(或添加)EnableBalloonTips(如REG_DWORD)并将值设置为1

  4. 重启。

瞧瞧。问题已解决。

我发现,即使我在代码中声明了图标,我也必须首先向 notifyIcon1.icon 属性.

添加一个图标

就我而言,David Mancini 的回复还不够,我还必须在“设置”->“系统”->“通知和操作”下启用“从应用程序和其他发件人获取通知”