在VB中怎样得到弹出试菜单的HWND？

Question

GetSubMenu VB声明 
Declare Function GetSubMenu Lib "user32" Alias "GetSubMenu" (ByVal hMenu As Long, ByVal nPos As Long) As Long 
说明 
取得一个弹出式菜单的句柄，它位于菜单中指定的位置 
返回值 
Long，位于指定位置的弹出式菜单的句柄（如果有的话）；否则返回零 
参数表 
参数 类型及说明 
hMenu Long，菜单的句柄 
nPos Long，条目在菜单中的位置。第一个条目的编号为0 

Answer 1

这个我早就知道了，但是我的菜单是这样的
头两个是隐藏的，用于右键时弹出，后面的是正常的，
而你的函数只能得到正常的菜单，对于隐藏的就不行，
用GetMenuItemCount 也只能得到不隐藏的菜单的个数。

Answer 2

是在窗体上已经设计好彩旦了吧？》那么先GetMenu得到窗口菜单，然后再GetSUbMenu得到子菜单好了。

Answer 3

如果菜单放在窗体上设计好的，那么GetMenu -> GetSubMenu

Answer 4

可是如果我的这个动态菜单用创建和控制非常方便，可是用API去创建和控制却是非常繁锁的话，那不是很浪费。