Question

我想在点击图片框上的特定位置时插入图片。当我在下面的代码中以数字形式放置坐标时，图像显示。

g.DrawImage(Image.FromFile("myImage.gif"), New Point(10, 10))

但我想要的是当我点击特定位置并将其放在变量上时检索坐标。但是这个代码没有显示图像，我只是用变量替换了数字10,10。

Private Sub PictureBox1_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles PictureBox1.MouseDown

    myX = e.X
    myY = e.Y

    g.DrawImage(Image.FromFile("myImage.gif"),New Point(myX, myY))

End Sub

为什么不起作用？任何想法先生。

Answer 1

您需要相对于表单的坐标。 e.X，e.Y和Cursor.Position，它们都提供全局坐标。因此，使用以下方法设置相对坐标：

g.DrawImage(Image.FromFile("myImage.gif"), Me.PointToClient(Cursor.Position))

在VB.net中的图片框上单击的位置显示图像

1 个答案: