應用程序不會顯示氣球提示

Question

我正在 VS2017 中編寫一個 VB.NET 應用程序，以在 Windows 10 上運行。我希望主（也是唯一的）表單最小化為系統托盤圖標。 那部分我工作正常。 下一部分，顯示氣球提示彈出通知（例如，“應用程序仍在運行”），根本不起作用。

我已經檢查/注意到以下內容：

• NotifyIcon對象在設計器網格以及表單的 vb.net 代碼隱藏中分配了一個圖標，與其關聯的BalloonTipIcon成員/屬性也是如此
• 機器上的組策略似乎沒有禁止使用氣球提示
• 氣球提示似乎沒有在注冊表中被禁用
• 該程序在 Windows 8.1 Pro 中按預期運行並顯示 BalloonTip，但在 Windows 10 Enterprise N 2016 LTSB 中不顯示。

該機器位於確實進行了組策略管理的域中，但是在我的機器上找到的結果策略集似乎並未表明氣球提示已被禁用。

從 StackOverflow 復制並粘貼確切代碼不起作用。 那么問題一定出在系統本身上。

這是代碼（適用於 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

我還能在哪里看？

在超級用戶上交叉發布

Answer 1

所以結果證明我愛上了書中最古老的技巧之一。 更改一個注冊表項后，我需要完全重新啟動。

所以，對我來說，讓氣球提示出現在 Windows 10 中需要以下內容：

1. 打開regedit.exe

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

3. 設置（或添加） EnableBalloonTips （如 REG_DWORD）並將值設置為1

4. 重啟。

瞧。 問題解決了。

Answer 2

我發現即使我在代碼中聲明了圖標，我也必須最初向 notifyIcon1.icon 屬性添加一個圖標。

Answer 3

在我的情況下，David Mancini 的回應還不夠，我還必須在“設置”->“系統”->“通知和操作”下啟用“從應用程序和其他發件人獲取通知”