Vb.net 创建要从系统托盘运行的程序

Vb.net 创建要从系统托盘运行的程序,vb.net,visual-studio-2010,Vb.net,Visual Studio 2010,我想创建一个程序,从Windows右下角的系统托盘运行 但我不知道从哪里开始 有人能告诉我在哪里查找和示例,或者使用什么命令\research吗?在windows主窗体中添加一个NotifyIcon。 使用Form中的Resize事件控制何时显示NotifyIcon并隐藏表单: Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize If Me.

我想创建一个程序,从Windows右下角的系统托盘运行

但我不知道从哪里开始


有人能告诉我在哪里查找和示例,或者使用什么命令\research吗?

在windows主窗体中添加一个
NotifyIcon
。 使用
Form
中的
Resize
事件控制何时显示
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
使用Notify中的事件图标再次显示表单:

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
您可以在google code project中下载完整的示例,也可以执行以下操作:

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

我回顾了我注意到遗漏图标的答案

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

看看这个,这是C#但是如果你有问题,你可以在这里把它翻译成VB.NET。谷歌真的很有用——搜索“VB.NET程序从系统托盘运行”返回。VisualBasic与VB.NET不同。感谢大家的反馈,我现在要阅读:)这不使用系统托盘。代码可以在任何地方使用,请在事件中放置“ToggleHide()”子以双击NotifyIcon…感谢大家,我会在canThanks工作出色时试一试!!只是不要做我做的事,尝试在没有图标的情况下使用它。。。这行不通。谢谢@DanBarber的提示。对于那些谁不知道在哪里添加图标。转到“设计”中的“通知图标”组件,并在“属性”窗口中设置.ico文件。起初我不知道他是什么意思,直到我尝试了上面的代码。