请教各位,在一个form上移动鼠标,如何知道当前鼠标指针在form的那个控件上?

glassboyboy 2005-09-11 10:23:47
请教各位,在一个form上移动鼠标,如何知道当前鼠标指针在form的那个控件上?
...全文
146 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
glassboyboy 2005-09-11
  • 打赏
  • 举报
回复
我是说,要得到当前鼠标指针所指的控件,而不是当前获得焦点的控件(Me.ActiveControl.Name)。
Hassle 2005-09-11
  • 打赏
  • 举报
回复
Public Declare Function ChildWindowFromPointEx Lib "user32" Alias "ChildWindowFromPointEx" (ByVal hWnd As Long, ByVal pt As POINTAPI, ByVal un As Long) As Long

Public Declare Function WindowFromPoint Lib "user32" Alias "WindowFromPoint" (ByVal xPoint As Long, ByVal yPoint As Long) As Long

用法查MSDN
kalakala 2005-09-11
  • 打赏
  • 举报
回复
Me.ActiveControl.Name
northwolves 2005-09-11
  • 打赏
  • 举报
回复
Me.ActiveControl.Name
WuYunpeng 2005-09-11
  • 打赏
  • 举报
回复
dim strName as string

private sub Button1_Move(x as long,y as long....)
strname="button1"
end sub

private sub text1_move(......)
strname="Text1"
end sub

......

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧