晕死 那是程序运行托盘到 任务拦噻!API函数

哦,你是指系统托盘呀!

Private Declare Function Shell_NotifyIcon Lib "shell32.dll" Alias _
"Shell_NotifyIconA" (ByVal dwMessage As Long, lpData As NOTIFYICONDATA) As Long

'Shell_NotifyIcon

'【说明】 此函数用于往任务栏加入指定的图标，用到了前面提到的NOTIFYICONDATA数据结构

'【参数表】

'参数dwMessage ---- 为消息设置值，它可以是以下的几个常数值：0、1、2

'NIM_ADD = 0 加入图标到系统状态栏中
'NIM_MODIFY = 1 修改系统状态栏中的图标
'NIM_DELETE = 2 删除系统状态栏中的图标

'参数LpData ---- 用以传入NOTIFYICONDATA数据结构变量，我们也需要在"模块"中定义其结构如下：

Private Type NOTIFYICONDATA

cbSize As Long '需填入NOTIFYICONDATA数据结构的长度
hWnd As Long '往任务栏安装图标的应用程序的窗体句柄,系统根据此发送消息给相应的应用程序
uid As Long '图标的唯一标识,由安装图标的应用程序确定
uFlags As Long '用来设置以下三个参数uCallbackMessage、hIcon、szTip是否有效
uCallbackMessage As Long '发给应用程序的回调消息,应当避免同系统预定义的消息相同,应大于WM_USER
hIcon As Long '图标句柄,即欲在任务栏中显示的图标
szTip As String * 64 '如果图标被允许显示TIP的话,那么当鼠标停留在任务栏图标上一段时间,将显示该串

End Type