答案:
有关Tray系统盒的VB API函数 |
' Shell Tray Functions Declare Function Shell_NotifyIcon Lib "shell32.dll" Alias "Shell_NotifyIconA" (ByVal dwMessage As Long, lpData As NOTIFYICONDATA) As Long dwMessage参数:NIM_ADD 添加指定的图标 NIM_DELETE 删除指定的图标 NIM_MODIFY 修改指定的图标 lpData参数: NOTIFYICONDATA,这个结构的内容因dwMessage参数而异。 Declare Function SHGetFileInfo Lib "shell32.dll" Alias " SHGetFileInfoA" (ByVal pszPath As String, ByVal dwFileAttributes As Long, psfi As SHFILEINFO, ByVal cbFileInfo As Long, ByVal uFlags As Long) As Long Declare Function SHGetNewLinkInfo Lib "shell32.dll" Alias "SHGetNewLinkInfoA" (ByVal pszLinkto As String, ByVal pszDir As String, ByVal pszName As String, pfMustCopy As Long, ByVal uFlags As Long) As Long |
上一个:让窗体居中
下一个:VB使用编程技巧三则