Question

VB shell_notifyicon这个API到底怎么用？系统托盘

模块代码：
Private Type NOTIFYICONDATA
cbSize As Long
hWnd As Long
uId As Long
uFlags As Long
ucallbackMessage As Long
hIcon As Long
szTip As String * 64
End Type

Dim TrayI As NOTIFYICONDATA

Public Const NIM_ADD = &H0
Public Const NIM_MODIFY = &H1
Public Const NIM_DELETE = &H2
Public Const NIF_MESSAGE = &H1
Public Const NIF_ICON = &H2
Public Const NIF_TIP = &H4

Public Const WM_LBUTTONDBLCLK = &H203
Public Const WM_LBUTTONDOWN = &H201
Public Const WM_RBUTTONUP = &H205
Private Declare Function Shell_NotifyIcon Lib "shell32" Alias "Shell_NotifyIconA" (ByVal dwMessage As Long, pnid As NOTIFYICONDATA) As Boolean

Private Sub Form_Load()
Totray.Into_Tray Me.hWnd, Me.Icon, "Tray Example"
Me.Hide
End Sub
但是以上这段代码，总是提示 form要求对象，对象是什么呢？
还有这到底是什么意思，会的话请详细描述下吧。谢谢

Answer 1

Totray.Into_Tray的Totray是一个对象，你没有定义。应该是“类”。Into_Tray是Totray类的一个方法（函数）

Answer 2

你在form_load过程中写的代码有问题.
应该先给变量TrayI赋值,然后再调用API函数Shell_NotifyIcon .

Answer 3

没看到呢调用 Shell_NotifyIcon
调用她的代码呢