منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
استخدام ال ProgressBar مع هذا الكود - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=28206)

استخدام ال ProgressBar مع هذا الكود - ابو روضة - 12-01-19

السلام عليكم اخوتى
كيف استخدم ال ProgressBar  مع هذا الكود الذى يحمل ملف من اليوتيوب

يعنى اريد ان اعرف وصل لآين فى التحميل لآنه يحمل ولا يظهر لى كم العدّ الذى وصل اليه
5% أو 20% أو أو أو
كود :
 Label1.Text = "جارى التحميل..."
       Dim video = YouTube.Default.GetVideo(txtUrl.Text)
       File.WriteAllBytes(FolderBrowserDialog1.SelectedPath & video.FullName, video.GetBytes())
       Label1.Text = "انتهى التحميل !"


RE: استخدام ال ProgressBar مع هذا الكود - بيسك لكل العرب - 14-01-19

كود :
 ProgressBar1.Increment(1)

      Label2.Text = ProgressBar1.Value & "%"


RE: استخدام ال ProgressBar مع هذا الكود - ابو روضة - 14-01-19

(14-01-19, 06:51 PM)بيسك لكل العرب كتب :
كود :
 ProgressBar1.Increment(1)

      Label2.Text = ProgressBar1.Value & "%"

بارك الله فيك أخى..
بيظهر لى 1 % فقط لا تتقدم


RE: استخدام ال ProgressBar مع هذا الكود - حريف برمجة - 14-01-19

اعتقد الفكرة تدور حول حجم الملف .. جرب هذي الطريقة ،، او احذف الضرب والقسمة و 100  .. 


كود :
ProgressBar1.Increment(video.GetBytes() *100 / 100)
Label2.Text = ProgressBar1.Value


RE: استخدام ال ProgressBar مع هذا الكود - ابو روضة - 15-01-19

(14-01-19, 07:56 PM)حريف برمجة كتب : اعتقد الفكرة تدور حول حجم الملف .. جرب هذي الطريقة ،، او احذف الضرب والقسمة و 100  .. 


كود :
ProgressBar1.Increment(video.GetBytes() *100 / 100)
Label2.Text = ProgressBar1.Value

شكرا لك أخى لكن لم تضبط للأسف

RE: استخدام ال ProgressBar مع هذا الكود - حريف برمجة - 15-01-19

(15-01-19, 04:45 AM)ابو روضة كتب :
(14-01-19, 07:56 PM)حريف برمجة كتب : اعتقد الفكرة تدور حول حجم الملف .. جرب هذي الطريقة ،، او احذف الضرب والقسمة و 100  .. 


كود :
ProgressBar1.Increment(video.GetBytes() *100 / 100)
Label2.Text = ProgressBar1.Value

شكرا لك أخى لكن لم تضبط للأسف

جرب تضع حجم الملف الأصلي في متغير

والحجم المحمل في متغير

وتعمل عملية حسابية للمتبقي وتضع القيمة في البروقريس بار