+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ProgressBar (/showthread.php?tid=19107)
ProgressBar - Mohamed20 - 03-02-17
لماذا هذا الكود لا يعمل
كود :
Dim input As Shell32.Folder = sc.NameSpace(Application.StartupPath + "\test\zz.zip")
ProgressBar2.Maximum = CInt(input.Items.Count)
For i = 0 To input.Items.Count - 1
ProgressBar2.Value = i
Nextاريد ان اجعل Maximum = Count لاكن لا يعمل حل من حل ؟