如何知道光标的坐标位？（比如在文本框中）

Question

GetCursorPos VB声明 
Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" (lpPoint As POINTAPI) As Long 
说明 
获取鼠标指针的当前位置 
返回值 
Long，非零表示成功，零表示失败。会设置GetLastError 
参数表 
参数 类型及说明 
lpPoint POINTAPI，随同指针在屏幕像素坐标中的位置载入的一个结构 
Public Type POINTAPI
        x As Long
        y As Long
End Type