求教MenuItemFromPoint 的使用?

wyj7485

求教MenuItemFromPoint 的使用: Declare Function MenuItemFromPoint Lib "user32" Alias "MenuItemFromPoint" (ByVal hWnd As Long, ByVal hMenu As Long, ByVal ptScreen As POINTAPI) As Long
说明
判断哪个菜单条目包含了屏幕上一个指定的点
返回值
Long，包含了指定点的条目的位置。如果没有菜单条目包含了指定的点，就返回-1
参数表
参数	类型及说明
hWnd	Long，包含了指定菜单的那个窗口的句柄
hMenu	Long，菜单句柄
ptScreen	MSITStore:H:\vbapi.chm::/POINTAPI.htm" target="_blank" >POINTAPI，点的位置。如hMenu是一个顶级菜单条，这个点就用hWnd窗口的窗口坐标表示。否则，它采用窗口的客户区坐标表示

Public Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long 1, Public Type POINTAPI
x As Long
y As Long
End Type 2, Dim Pt As POINTAPI GetCursorPos Pt 假设hWnd和hMenu已知, 调用MenuItemFromPoint hWnd,hMenu,Pt 为什么不行? 是Pt 这个参数传递不对.提示:用户定义类型不能用ByVal传递. 请问如何解决?