+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] أحتاج المساعده في برنامجي ضغط الملفات (/showthread.php?tid=13221)
أحتاج المساعده في برنامجي ضغط الملفات - adel27 - 13-09-15
السـلام عليكم ورحمة الله وبركاته
أخواني عندي برنامج البرنامج عبـاره عن ضغط ملفات وأستخراج ملفات
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
ProgressBar1.Increment(1)
If ProgressBar1.Value = 100 Then
Label1.Text = "تمت العمليه"
End If
Label2.Text = ProgressBar1.Value & ("%")
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Form2.Show()
Me.Hide()
End Sub
End Class
شغال ممتاز يضغط الملف والعيب هنا واحد فقط
أن ProgressBar1 لما يمشي من 0إلى 100 وتنتهي عملية الضغط يبقى 100% وأنا أبيه يرجع صفر يتجهز للملف اللي بعده
=============================================================================
نفس المشكله في أن ProgressBar1 لما يمشي من 0إلى 100 وتنتهي عملية الضغط يبقى 100% وأنا أبيه يرجع صفر يتجهز للملف اللي بعده
وأبي التكست اللي في اليبل يرجع مثل أول الكود يا جماعه لا هنتو
أتمنى مســاعدتي كون هذا المشروع واقف على هذه المشكله
RE: أحتاج المساعده في برنامجي - adel27 - 13-09-15
ألف شكر يابو عمر والله يخلي لك عمر
مبدع دائماً رغم أن شهادتي فيك مجروحه
RE: أحتاج المساعده في برنامجي - midoo - 26-10-15
أرجو تعديل العنوان ليظهر في البحث لمن يحتاجه.
RE: أحتاج المساعده في برنامجي ضغط الملفات - abulayth - 26-10-15
تم تعديل العنوان ونقل المثال لاخونا ابو عمر لمكتبة الاكواد على الرابط التالي
http://vb4arb.com/vb/thread-13614.html
يعطيكم العافية