vb中如何获取指针现在坐标

[复制链接]
查看11 | 回复0 | 2009-1-30 06:28:38 | 显示全部楼层 |阅读模式
一个程序,当坐标小于某个值时就会发生某事件的代码

                                                                                                CurrentX、CurrentY 属性 返回或设置下一次打印或绘图方法的 水平 (CurrentX) 或垂直 (CurrentY) 坐标。设计时不可用。 语法 object.CurrentX [= x] object.CurrentY [= y] CurrentX 和 CurrentY 属性语法包含下面部分: 部分 描述 Object 对象表达式,其值是“应用于”列表中的一个对象。 X 确定水平坐标的数值。 Y 确定垂直坐标的数值。 说明 坐标从对象的左上角开始测量。在对象的左边 CurrentX 属性值为 0,上边的 CurrentY 为 0。坐标以缇为单位表示,或以 ScaleHeight、ScaleWidth、ScaleLeft、ScaleTop 和 ScaleMode 属性定义的度量单位来表示。 用下面的图形方法时,CurrentX 和 CurrentY 的设置值按下述说明改变: 方法 设置 CurrentX, CurrentY 为: Circle 对象的中心。 Cls 0,0。 EndDoc 0,0。 Line 线终点。 NewPage 0,0。 Print 下一个打印位置。 Pset 画出的点。 GetCursorPos VB声明 Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" (lpPoint As POINTAPI) As Long 说明 获取鼠标指针的当前位置 返回值 Long,非零表示成功,零表示失败。会设置GetLastError 参数表 参数 类型及说明 lpPoint POINTAPI,随同指针在屏幕像素坐标中的位置载入的一个结构                                       
提问者对答案的评价:
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行