用GetMenuItemRect函数,相关说明如下:
VB声明 
Declare Function GetMenuItemRect Lib "user32" Alias "GetMenuItemRect" (ByVal hWnd As Long, ByVal hMenu As Long, ByVal uItem As Long, lprcItem As RECT) As Long 说明 
在一个矩形中装载指定菜单条目的屏幕坐标信息 返回值 
Long,TRUE(非零)表示成功,否则返回零。会设置GetLastError 参数表 
参数     类型及说明 
hWnd      Long,包含指定菜单或弹出式菜单的一个窗口的句柄 
hMenu     Long,菜单的句柄 
uItem     Long,欲检查的菜单条目的位置或菜单ID 
lprcItem  RECT,在这个结构中装载菜单条目的位置及大小(采用屏幕坐标表示)