我有一个名为BGImage
. 我希望当用户点击它时,我可以捕捉到鼠标相对于BGImage
.
我试过使用MousePosition
,却发现它在屏幕上给出了鼠标位置,而不是在 PictureBox 上。
所以我也尝试使用PointToClient
:
Dim MousePos As Point = Me.PointToClient(MousePosition)
但这给了我位置{X=1866,Y=55}
,而我实际上点击了大约{X=516,Y=284}
.
我认为问题的出现是因为我已经全屏显示了我的程序并将 PictureBox 的位置设置为屏幕的中心(BGImage.Location = New Point((My.Computer.Screen.WorkingArea.Width / 2) - (1008 / 2), ((My.Computer.Screen.WorkingArea.Height / 2) - (567 / 2)))
)
我还应该提到 PictureBox 的大小是 1008 × 567 像素,我的屏幕分辨率是 1366 × 768。
有什么办法可以让鼠标位置相对于 BGImage 的位置?