VB6中无标题窗体，想拦截右键点击消息以弹出自定义的菜单。

Question

一个VB6问题，查了一周多没结果。 
一个无标题窗体，就是BorderStyle=0的，我自定义了菜单，可是如何才能拦截到右键点击任务栏按钮的消息呢？左键单击任务按钮，窗体也不会最小化，还不能用Alt+Tab切换程序。
目前迫切想知道如果拦截右键点击任务栏按钮的消息。
第一次在CSDN上发贴，顺祝所有人元旦快乐！！！

Answer 1

既然已将窗体设置为无标题，意味着没有了控制菜单。任务栏上有图标就可以Alt+Tab。想让窗体最小化，可以通过右击窗体产生快捷菜单实现。

Answer 2

在窗体上点击右键弹出菜单当然容易实现，我现在是想，在任务栏按钮上点右键也能弹出我的菜单。
具体就是：
在VB6中，当窗体设为无标题时，默认在任务栏上也不出现该窗体按钮，于是我就把ShowInTaskbar属性设为True，这样，任务栏上就有该窗体的按钮出现了，但是点击无反应，就是说，左键点击窗体不会最小化，右键点击亦不出现控制菜单。
我现在就是想找个哪怕是Hook之类的API也行，来拦截本窗体在任务栏按钮被点击的消息（MouseUp），从而弹出我自己的菜单。
谢谢！希望本贴能在2009年有正确答案！

Answer 3

还是自己解决了，用了个Hook：
勾子——
WindowProc(ByVal hWnd As Long, ByVal iMsg As Long, ByVal wParam As Long, ByVal lParam As Long)拦截——
iMsg = 787&
wParam = 0
这是我自己测出来的，在这里就可以处理了