如何获得鼠标的坐标值？

如何在form_load里获取鼠标的坐标值？ 问题点数：20、回复次数：2Top

1 楼subzero（赘姆烂壳）回复于 2001-01-17 20:50:00 得分 20

private   Declare   Function   GetCursorPos   Lib   "user32"   Alias   "GetCursorPos"   (lpPoint   As   POINTAPI)   As   Long  
  private   Type   POINTAPI  
                  x   As   Long  
                  y   As   Long  
  End   Type  
   
  private   sub   form_load()  
  dim   p   as   pointapi  
  getcursorpost   p  
  msgbox   p.x   &   "   "   &   p.y  
  end   subTop

2 楼vbdabster（BEYOND）回复于 2001-01-17 21:42:00 得分 0

怎么我都是慢人一步阿，其实我也不会的Top

相关问题

• 鼠标
• pointapi
• getcursorpos
• 鼠标的坐标值
• load
• sub
• form

• 帖主：limengchen
• subzero

• Visual Basic类图书
• Visual Basic类源码下载