资讯

精准传达 • 有效沟通

从品牌网站建设到网络营销策划,从策略到执行的一站式服务

如何用VB.NET编写托盘程序

这篇文章主要介绍如何用VB.NET编写托盘程序,文中介绍的非常详细,具有一定的参考价值,感兴趣的小伙伴们一定要看完!

为白银区等地区用户提供了全套网页设计制作服务,及白银区网站建设行业解决方案。主营业务为做网站、成都网站设计、白银区网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!

本文程序的设计及运行环境

(1)Windows 2000 Service

(2)Net Framework SDK 正式版

VB.NET静态托盘程序的编写过程

所谓VB.NET静态托盘程序是指程序运行后,在系统托盘区的图标处于静止状态的托盘程序。动态托盘程序正好与之相反,它是指在系统托盘区图标呈现动画效果的一类托盘程序。下面就来探讨一下VB.NET是如何实现静态托盘程序。

.Net FrameWork SDK为编写托盘程序提供了一个组件:NotifyIcon组件。NotifyIcon组件是一个WinForm组件,位于命名空间"System.Windows.Forms"中,在VB.NET程序中,只要创建一个NotifyIcon组件的实例,并且对NotifyIcon实例的"Icon"属性赋值,这样一个简单的托盘程序就完成了。下面就是这个简单托盘程序对于的代码(Form1.vb):

  1. Public Class Form1   

  2. Inherits System.Windows.Forms.Form   

  3. #Region " Windows 窗体设计器生成的代码 "   

  4. Public Sub New ( )   

  5. MyBase.New ( )   

  6. '该调用是 Windows 窗体设计器所必需的。   

  7. InitializeComponent ( )   

  8. '在 InitializeComponent ( ) 调用之后添加任何初始化   

  9. End Sub   

  10. '窗体重写处置以清理组件列表。   

  11. Protected Overloads Overrides Sub Dispose 
    ( ByVal disposing As Boolean )   

  12. If disposing Then   

  13. If Not ( components Is Nothing ) Then   

  14. components.Dispose ( )   

  15. End If   

  16. End If   

  17. MyBase.Dispose ( disposing )   

  18. End Sub   

  19. 'Windows 窗体设计器所必需的   

  20. Private components As System.ComponentModel.IContainer   

  21. '注意:以下过程是 Windows 窗体设计器所必需的   

  22. '可以使用 Windows 窗体设计器修改此过程。   

  23. '不要使用代码编辑器修改它。   

  24. Friend WithEvents NotifyIcon1 As System.Windows.Forms.NotifyIcon   

  25. '创建一个NotifyIcon实例   

  26. Friend TrayIcon = New Icon ( "Tray.ico" )   

  27. '创建一个Icon实例   

  28.    

  29. Private Sub InitializeComponent ( )   

  30. Me.components = New System.ComponentModel.Container ( )   

  31. Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon 
    ( Me.components )   

  32. Me.NotifyIcon1.Text = "NotifyIcon1"   

  33. Me.NotifyIcon1.Visible = True   

  34. '对NotifyIcon实例的Icon属性赋值,完成简单托盘程序   

  35. Me.NotifyIcon1.Icon = TrayIcon   

  36. Me.AutoScaleBaseSize = New System.Drawing.Size ( 6 , 14 )   

  37. Me.ClientSize = New System.Drawing.Size ( 292 , 273 )   

  38. Me.Name = "Form1"   

  39. Me.Text = "Form1"   

  40. End Sub   

  41. #End Region   

  42. End Class   

  43. '启动程序   

  44. Module Module1   

  45. Sub Main ( )   

  46. Application.Run ( new Form1 ( ) )   

  47. End sub   

  48. End Module  

以上是“如何用VB.NET编写托盘程序”这篇文章的所有内容,感谢各位的阅读!希望分享的内容对大家有帮助,更多相关知识,欢迎关注创新互联行业资讯频道!


新闻名称:如何用VB.NET编写托盘程序
网站链接:http://cdkjz.cn/article/gohjec.html
多年建站经验

多一份参考,总有益处

联系快上网,免费获得专属《策划方案》及报价

咨询相关问题或预约面谈,可以通过以下方式与我们联系

业务热线:400-028-6601 / 大客户专线   成都:13518219792   座机:028-86922220