form内の指定場所にマウスを表示 (ID:82207)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 試せば分かるようなことをイチイチ質問されるのもねェ……。 SetCursorPosに渡す座標はピクセル単位で渡す必要があるので Dim lXPos&, lYPos As Long lXPos = (Form1.Left + Wid_Pos) / Screen.TwipsPerPixelX lYPos = (Form1.Top + Wid_Pos) / Screen.TwipsPerPixelY Call SetCursorPos(lXPos, lYPos) とします。 ただし、これはフォームの左上から座標なんでフォームの枠の幅、高さを GetSystemMetricsとかで取らないとフォーム上の正確な座標を指すことは出来ません。