ho risolto così

codice:
Private Sub PictureBox2_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox2.MouseDown

        
        X1 = e.X
        Y1 = e.Y - 18
       

End Sub