到目前为止,我所看到的清除图片框的代码都没有达到我所需要的。我想清除一个图片框,以便我可以在“空白”背景上绘制新的东西。
这是我的代码:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
PictureBoxClear(Me.PictureBox1)
m_i = m_i + 1
Dim nPT As New Point(0, 0)
Me.ImageList1.Draw(Me.PictureBox1.CreateGraphics, nPT, m_i)
End Sub
Public Sub PictureBoxClear(ByRef pb As PictureBox)
pb.Image = Nothing
End Sub
说
.Image = Nothing
似乎完全删除了图像,这样我之后就不能真正在它上面画一些东西了。我只是想清除我的图片框,以便它可以再次获得一些绘图。
谢谢!