如何用VB.NET編寫托盤程序

這篇文章主要介紹如何用VB.NET編寫托盤程序，文中介紹的非常詳細(xì)，具有一定的參考價(jià)值，感興趣的小伙伴們一定要看完！

本文程序的設(shè)計(jì)及運(yùn)行環(huán)境

（1）Windows 2000 Service

（2）Net Framework SDK 正式版

VB.NET靜態(tài)托盤程序的編寫過程

所謂VB.NET靜態(tài)托盤程序是指程序運(yùn)行后，在系統(tǒng)托盤區(qū)的圖標(biāo)處于靜止?fàn)顟B(tài)的托盤程序。動(dòng)態(tài)托盤程序正好與之相反，它是指在系統(tǒng)托盤區(qū)圖標(biāo)呈現(xiàn)動(dòng)畫效果的一類托盤程序。下面就來探討一下VB.NET是如何實(shí)現(xiàn)靜態(tài)托盤程序。

.Net FrameWork SDK為編寫托盤程序提供了一個(gè)組件：NotifyIcon組件。NotifyIcon組件是一個(gè)WinForm組件，位于命名空間"System.Windows.Forms"中，在VB.NET程序中，只要?jiǎng)?chuàng)建一個(gè)NotifyIcon組件的實(shí)例，并且對NotifyIcon實(shí)例的"Icon"屬性賦值，這樣一個(gè)簡單的托盤程序就完成了。下面就是這個(gè)簡單托盤程序?qū)τ诘拇a（Form1.vb）：

Public Class Form1   
Inherits System.Windows.Forms.Form   
#Region " Windows 窗體設(shè)計(jì)器生成的代碼 "   
Public Sub New ( )   
MyBase.New ( )   
'該調(diào)用是 Windows 窗體設(shè)計(jì)器所必需的。   
InitializeComponent ( )   
'在 InitializeComponent ( ) 調(diào)用之后添加任何初始化   
End Sub   
'窗體重寫處置以清理組件列表。   
Protected Overloads Overrides Sub Dispose 
( ByVal disposing As Boolean )   
If disposing Then   
If Not ( components Is Nothing ) Then   
components.Dispose ( )   
End If   
End If   
MyBase.Dispose ( disposing )   
End Sub   
'Windows 窗體設(shè)計(jì)器所必需的   
Private components As System.ComponentModel.IContainer   
'注意：以下過程是 Windows 窗體設(shè)計(jì)器所必需的   
'可以使用 Windows 窗體設(shè)計(jì)器修改此過程。   
'不要使用代碼編輯器修改它。   
Friend WithEvents NotifyIcon1 As System.Windows.Forms.NotifyIcon   
'創(chuàng)建一個(gè)NotifyIcon實(shí)例   
Friend TrayIcon = New Icon ( "Tray.ico" )   
'創(chuàng)建一個(gè)Icon實(shí)例   
<System.Diagnostics.DebuggerStepThrough ( ) >   
Private Sub InitializeComponent ( )   
Me.components = New System.ComponentModel.Container ( )   
Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon 
( Me.components )   
Me.NotifyIcon1.Text = "NotifyIcon1"   
Me.NotifyIcon1.Visible = True   
'對NotifyIcon實(shí)例的Icon屬性賦值，完成簡單托盤程序   
Me.NotifyIcon1.Icon = TrayIcon   
Me.AutoScaleBaseSize = New System.Drawing.Size ( 6 , 14 )   
Me.ClientSize = New System.Drawing.Size ( 292 , 273 )   
Me.Name = "Form1"   
Me.Text = "Form1"   
End Sub   
#End Region   
End Class   
'啟動(dòng)程序   
Module Module1   
Sub Main ( )   
Application.Run ( new Form1 ( ) )   
End sub   
End Module  

以上是“如何用VB.NET編寫托盤程序”這篇文章的所有內(nèi)容，感謝各位的閱讀！希望分享的內(nèi)容對大家有幫助，更多相關(guān)知識(shí)，歡迎關(guān)注億速云行業(yè)資訊頻道！