首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

怎么在隐藏窗体时同时隐藏托盘图标

2012-03-28 
如何在隐藏窗体时同时隐藏托盘图标我希望用热键实现窗体隐藏时托盘图标也自动隐藏,这该怎么实现呀??请指教

如何在隐藏窗体时同时隐藏托盘图标
我希望用热键实现窗体隐藏时托盘图标也自动隐藏,这该怎么实现呀??请指教~
最好把源码也给我,谢谢了~~

[解决办法]
[code=VB][/code]
'声明一个函数如下:
Private Sub traydelbal(ByVal MyForm As Form)
 
With ni
.cbSize = Len(ni)
.hWnd = MyForm.hWnd

End With
Shell_NotifyIcon NIM_DELETE, ni
End Sub
'再在热键隐藏处调用它。
'比如:
If a Then '如果窗体是可见状态那么
Form1.Hide '如果是你设置的快捷键且窗体当前可见 就隐藏窗体
traydelbal Form1
a = False '用于重新显示

热点排行