Visual Basic 中学校 掲示板 投稿の管理
タグのない投稿を抽出
統計
RSS
Visual Basic 中学校
投稿一覧
マウスポインタの位置
この投稿へのリンク
https://keijiban.umayadia.com/ThreadDetail.aspx?ThreadId=30297#CommentId83125
この投稿の削除
削除パスワード
削除する
コメント本文
投稿者
N88-BASIC
 (社会人)
投稿日時
2017/10/17 17:11:22
Windows 10 (Ver 1703) + Visual Basic 2017 にてマウスカーソルを独自に作成したアイコンファイルを設定して、マウスポインタを位置を取得する処理を行っております。
この時に取得されるマウスポインタの位置がマウスポインタの左上の位置ではなくマウスポインタ(サイズ)の中央となっているようです。当然、マウスの挙動もマウスポインタの中央を基準にされているようです。
マウスポインタの挙動が左上(位置情報も含めて)となるようにする方法をご教授いただければ幸いです。
・アイコンの作成は Dobon ネットさんを参照させていただきました。
・実際のアイコンの設定はプロジェクトのリーソスに登録したものを参照しています。
以上 よろしくお願いします。
------------------------- 以下がコードの概要です ----------------------------
Dim MyCus As Cursor = New Cursor("MyIcon.ico")
Cursor = MyCus
~~~
Private Sub PictureBox1_MouseClick(sender As Object, e As MouseEventArgs) Handles PictureBox1.MouseClick
TextBox1.text=e.Location.X.ToString("X=#0") + e.Location.Y.ToString(" Y=#0")
End Sub