急！鼠标位置问题！

Question

怎样获得文本框中鼠标的位置。

Answer 1

在mousedown mouseup mousemove等与鼠标相关的事件中不是有鼠标的位置吗。

Answer 2

声明： 
Private Type POINTAPI 
x As Long 
y As Long 
End Type 
Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long 例子： 
Dim p As POINTAPI 
Call GetCursorPos( p ) 
' ( p.x, p.y )为鼠标位置

Answer 3

mouse up mouse down 获得的是相对与容器中鼠标的位置吗，例如鼠标落在文本框中，是相对于
文本框的位置吗

Answer 4

不是光标位置啊。其实鼠标位置倒没什么可以讨论的，倒是控件使用的坐标映射模式比较的烦人如果你画图的话mousemove里动态处理，很方便