السـلام عليكم ورحمة الله وبركاته
أخواني عندي برنامج البرنامج عبـاره عن ضغط ملفات وأستخراج ملفات
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% وأنا أبيه يرجع صفر يتجهز للملف اللي بعده
وأبي التكست اللي في اليبل يرجع مثل أول الكود يا جماعه لا هنتو
أتمنى مســاعدتي كون هذا المشروع واقف على هذه المشكله
أخواني عندي برنامج البرنامج عبـاره عن ضغط ملفات وأستخراج ملفات
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% وأنا أبيه يرجع صفر يتجهز للملف اللي بعده
وأبي التكست اللي في اليبل يرجع مثل أول الكود يا جماعه لا هنتو
أتمنى مســاعدتي كون هذا المشروع واقف على هذه المشكله