使用VBA定位光标/鼠标尖端

Question

我正在使用Visual Basic for Applications，在我的程序中，我正在打开Inventor部件并捕获缩略图。如果鼠标尖端悬停在零件上，我会得到不良结果。我希望能够重新定位光标，使其完全不受影响。

非常感谢任何能够完成此任务以及所需参考的VBA代码。

Answer 1

你可以使用SetCursorPos API来解决这个问题，但如果你没有把它放回原来的位置，那么用户体验可能会很糟糕：

Private Declare Sub SetCursorPos Lib "user32.dll" (x As Long, y As Long)

Sub Example()
    SetCursorPos 0, 0
End Sub

如果你做想要恢复原始位置，只需先用GetCursorPos抓住它。