創建一個程序從系統托盤運行

我想創建一個程序，從Windows的右下角系統托盤運行。創建一個程序從系統托盤運行

但我不知道從哪裏開始？

有人可以告訴\讓我看看在哪裏看和例子或什麼命令使用\研究？

2013-08-07 Pavle Stojanovic

看看這個http://stackoverflow.com/a/1732294/351383，這是C＃，但如果你有問題，你可以把它翻譯到VB.NET這裏http://converter.telerik.com/ –

谷歌真的很有用 - 搜索「VB.NET程序從系統托盤運行」返回[在VB.NET中創建系統托盤應用程序]（http://www.codeproject.com/Articles/75822/Create-a-系統盤，應用程序在-VB-NET）。而Visual Basic不是**和VB.NET一樣。 – Tim

謝謝你們的反饋我現在會做一些閱讀:) –

我查看答案我注意到，錯過了圖標。

Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize 
    If Me.WindowState = FormWindowState.Minimized Then 
     NotifyIcon1.Visible = True 
     NotifyIcon1.Icon = SystemIcons.Application 
     NotifyIcon1.BalloonTipIcon = ToolTipIcon.Info 
     NotifyIcon1.BalloonTipTitle = "Verificador corriendo" 
     NotifyIcon1.BalloonTipText = "Verificador corriendo" 
     NotifyIcon1.ShowBalloonTip(50000) 
     'Me.Hide() 
     ShowInTaskbar = False 
    End If 
End Sub 

Private Sub NotifyIcon1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles NotifyIcon1.DoubleClick 
    'Me.Show() 
    ShowInTaskbar = True 
    Me.WindowState = FormWindowState.Normal 
    NotifyIcon1.Visible = False 
End Sub

來源

2015-05-25 16:39:39 Doberon

我不清楚這是否回答OP問題。 – kaz

在主窗口窗體中添加NotifyIcon。使用Resize事件Form控制何時顯示NotifyIcon及隱藏表單：

Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize 
     If Me.WindowState = FormWindowState.Minimized Then 
       NotifyIcon1.Visible = true 
       Me.Hide() 
       NotifyIcon1.BalloonTipText = "Hi from right system tray" 
       NotifyIcon1.ShowBalloonTip(500) 
     End If 
    End Sub

使用中的NotifyIcon的事件再次顯示形式：

Private Sub NotifyIcon1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles NotifyIcon1.DoubleClick 
     Me.Show() 
     Me.WindowState = FormWindowState.Normal 
     NotifyIcon1.Visible = False 
    End Sub

你可以下載一個完整的示例在AutoDNIE谷歌代碼項目

來源

2013-08-07 10:15:23 jlvaquero

謝謝你們，我會給它一個去當我可以 –

謝謝工作很棒！只是不要做我所做的，並嘗試使用它沒有圖標......它不會工作。 – DanBarber

您還可以：

Sub ToggleHide() 
    If Me.WindowState = FormWindowState.Normal Then 
     Me.ShowInTaskbar = False 
     Me.WindowState = FormWindowState.Minimized 
    Else 
     Me.ShowInTaskbar = True 
     Me.WindowState = FormWindowState.Normal 
    End If 
End Sub

來源

2013-08-07 11:58:11 Rob

這不使用系統托盤。 –

該代碼可以在任何地方使用，將事件中的「ToggleHide（）」子文件放入NotifyIcon雙擊... – Rob

創建一個程序從系統托盤運行

回答

相關問題