如果让右键菜单隐藏？？

Question

程序里如果窗体最小化就会在托盘里有个图标，右键点击图标的时候会弹出快捷菜单。可问题是如果我不点击此菜单，这个菜单就一直留在右下角，我该怎么做才能达到：出现快捷菜单后，鼠标左键随便点哪（像桌面啊，其他的什么窗体）菜单就会消失掉的效果呢？

Answer 1

先使用 SetForegroundWindow 把主窗口设置为前台 这样就会消失了

Answer 2

譬如 ：
SetForegroundWindow trayForm.hWnd '在弹出菜单前设置trayForm为前台窗口
trayForm.PopupMenu trayMenu'弹出菜单

Answer 3

Private Declare Function SetForegroundWindow Lib "user32" (ByVal hWnd As Long) As Long