|
|

楼主 |
发表于 2006-7-19 13:43:00
|
显示全部楼层
Re:chery/我要请你逐句逐条讲解.. 这个代码.
我真的需要啊.我在你面前完全就可以说是个门外汉了. 我前两天才把Sendkey ""这个学会呢,昨天才领悟了一点又看了看MSDN精简版里原来也讲到的,你应该知道我基础多差了,真的好想你专门指导啊,你什么时候有空和时间啊?
就比如里面的这些我都看不懂啦,别打击我学习热情啊,好不,,
Private Type NOTIFYICONDATA (这个我知道是定义的type结构,但里面的不懂了)
cbSize As Long
hWnd As Long
uId As Long
uFlags As Long
ucallbackMessage As Long
hIcon As Long
szTip As String * 64
End Type
Private Const NIM_ADD = &H0
Private Const NIM_MODIFY = &H1
Private Const NIM_DELETE = &H2
Private Const WM_MOUSEMOVE = &H200
Private Const NIF_MESSAGE = &H1
Private Const NIF_ICON = &H2
Private Const NIF_TIP = &H4
Private Declare Function Shell_NotifyIcon Lib "shell32" Alias "Shell_NotifyIconA" (ByVal dwMessage As Long, pnid As NOTIFYICONDATA) As Boolean
Dim t As NOTIFYICONDATA
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer |
|