以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  动态新增的vs控件 如果获取其在屏幕中的绝对坐标  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=94748)
--  作者：yjf123
--  发布时间：2016/12/31 17:10:00
--  动态新增的vs控件 如果获取其在屏幕中的绝对坐标
动态新增的vs控件 如果获取其在屏幕中的绝对坐标
--  作者：有点色
--  发布时间：2017/1/1 0:46:00
--  

 参考

 

Dim dp As Point
dp = e.Form.controls("Button1").basecontrol.PointToClient(dp)
msgbox(-dp.x & " " & -dp.y)
--  作者：yjf123
--  发布时间：2017/1/1 9:43:00
--  
以下是引用有点色在2017/1/1 0:46:00的发言：

 参考

 

Dim dp As Point
dp = e.Form.controls("Button1").basecontrol.PointToClient(dp)
msgbox(-dp.x & " " & -dp.y)

 

如果是System.Windows.Forms.toolStripMenuItem 呢 它没有PointToClient成员
--  作者：有点色
--  发布时间：2017/1/1 10:20:00
--  

toolStripMenuItem 不是一个控件，无法直接获取的，你只能获取菜单的位置。

 

或者你直接说你想做什么功能。