请问:显示PictureBox中某点相对位置的有关问题

请教:显示PictureBox中某点相对位置的问题在picturebox中建了label,鼠标在图片框内移动时,在label上显示鼠

请教:显示PictureBox中某点相对位置的问题
在picturebox中建了label,鼠标在图片框内移动时,在label上显示鼠标位置相对picture中某点的距离,此距离不随窗体在屏幕位置的影响。请问哪些途径可以实现?非常感谢!

[解决办法]
以下代码能显示鼠标相对图片框原点的位置:

Private Sub Picture1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.Caption = "X= " & X & vbNewLine & "Y= " & Y
Shape1.FillColor = RGB(Val(Text4), Val(Text5), Val(Text6))
End Sub