Kod:
Private Sub Button8_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button8.Click
PictureBox1.Image = Nothing
guncelle()
Dim Hedef As String
yol = Directory.GetCurrentDirectory()
Hedef = yol + "\resim\\" + Me.TextBox2.Text + ".jpg"
Kill(Hedef)
TextBox9.Text = Hedef
Kill(Hedef)
End Sub