新网创想网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
添加托盘图标控件,并设置好其Icon属性,然后添加如下代码:
成都创新互联是创新、创意、研发型一体的综合型网站建设公司,自成立以来公司不断探索创新,始终坚持为客户提供满意周到的服务,在本地打下了良好的口碑,在过去的十年时间我们累计服务了上千家以及全国政企客户,如办公窗帘等企业单位,完善的项目管理流程,严格把控项目进度与质量监控加上过硬的技术实力获得客户的一致夸奖。
Private Sub Form1_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
e.Cancel = True
Me.Hide()
End Sub
这样实现了点关闭,进入托盘,如果点最小化进入托盘:
'窗体最小化时候隐藏窗体,
Private Sub MainForm_SizeChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.SizeChanged
If Me.WindowState = FormWindowState.Minimized Then
Me.Hide()
Me.ShowInTaskbar = False
End If
End Sub
只有windows 7等以上版本的操作系统才可以自动消失。其他windows NT内核版本,例如:windows 2003,windows xp,windows 2000等老版本,要让图标托盘消失,必须至少要两种方法:
1:退出程序时,在代码里调用删除托盘图标的代码。
2:程序崩溃时或者是手动结束进程后,图标遗留在右下角,只能用鼠标移动到上面,它才会消失。
所以,必须要在代码里面写上退出托盘的程序,因为很多人当然也包括我自己,有时候编写代码,只编写了启动托盘的代码,没有写退出托盘的代码,以为程序退出了,托盘图标会自己消失。而事实上不是这样的,托盘的启动和退出,必须要自己来显式的在程序里面实现。启动托盘实现后,必须要实现退出托盘。
所以建议大家在编写托盘图标程序时,在退出程序的时候,显式的调用删除托盘图标的代码就可以了。
在FormClosing的时候,
e.Cancel = True
Me.Hide()
托盘图标Click里面,
Me.Show()
VB.NET编写托盘程序
托盘程序作为一类特殊的窗体,其快捷图标显示在
系统托盘
中,窗体本身则隐藏不可见。在.NET之前版本的VB中编写托盘程序是十分困难的,但是VB.NET提供的新的NotifyIcon组件却使VB初学者也能轻松编写一个这样的程序:
新建“Windows应用程序”,设置主窗体Opacity属性为0,FormBorderStyle属性为None,ShowInTaskbar属性为
False,这样窗体将在启动后隐藏。在窗体上放置一个NotifyIcon组件NotifyIcon1,一个ContextMenu(弹出菜单)组件
ContextMenu1,并根据需要为ContextMenu1添加菜单项。
设置NotifyIcon1的ICON属性,这个图标就是应用程序出现在系统托盘中的快捷图标;设置NotifyIcon1的Text属性为“VB.NET托盘程序”,这就是鼠标移动到托盘图标时弹出的文字说明;设置NotifyIcon1的ContextMenu属性为ContextMenu1,也就是右键单击快捷图标时的弹出菜单为
ContextMenu1。OK,按F5运行!
几乎不用编写代码,一个托盘程序就这样轻松实现了。
添加托盘图标控件,并设置好其Icon属性,然后添加如下代码:
Private Sub Form1_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
e.Cancel = True
Me.Hide()
End Sub
1.降窗体的WindowState 属性 设置为 Mininmized;将ShowInTaskbar属性设置为False
2.在窗体的Load事件中添加下面的代码
if Me.WindowState = FormWindowState.Minimized then
me.hide()
end if