[3booody]

نعم اخي اعتذر عقدتها شوي بمثالي بإستخدام BackgroundWorker

خلينا بالمهم
Using تستخدمها بحيث لاتضطر الى انشاء كائن من ZipFile ويكون استخدامها فقط لغاية End Using

يعني بدل ما نعرف فئة من ZipFile

كود :

Dim zip As ZipFile = ZipFile.Read(txt_ZipFile)

يمكننا استخدامها من خلال الكلمة المحجوزه Using
وثم موت الفئة في End Using

وهذا الكود سيكون واضح لك ان شاء الله

كود :

Using zip As ZipFile = ZipFile.Read("مسار ملف zip")
                zip.Password = "111" 'في حالة وجود كلمة سر
                zip.ExtractAll("مسار الحفظ", Ionic.Zip.ExtractExistingFileAction.OverwriteSilently)
            End Using

واذا تحب بدون استخدام Using

كود :

Dim zip As ZipFile = ZipFile.Read(txt_ZipFile.Text)
            zip.ExtractAll(Save.Text, Ionic.Zip.ExtractExistingFileAction.OverwriteSilently)