[ربيع]

(22-02-14, 04:44 PM)mohssan كتب : مو مهم الكود الي استعملته المهم ابغي كود يحذف الصورة

نحمده ونصلي على رسوله الكريم

اذا اردت التعلم ضع الكود الذي استخدمته لنبين لك ما الخطا فيه وما الصواب
على كلا قد تكون استخدمت الكود التالي لجلب الصورة:

كود :

PictureBox1.Image = Image.FromFile("ImagePath")

استخدم الكود التالي لتستطيع الحذف:

كود :

Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button4.Click
    Dim ofd As New OpenFileDialog()
    ofd.ShowDialog()

    Using img As New FileStream(ofd.FileName, FileMode.Open)
        PictureBox1.Image = Image.FromStream(img)
        imagePath = ofd.FileName
    End Using
End Sub

Private imagePath As String

Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button5.Click
    Try
        File.Delete(imagePath)

    Catch ex As Exception
        MessageBox.Show(ex.Message)
    End Try
End Sub