+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : ربط أداة progress bar مع عملية البحث (/showthread.php?tid=22851)
ربط أداة progress bar مع عملية البحث - fouadhdfouad - 08-12-17
السلام عليكم اخواني الكرام ..
جمعة مبارة للجميع ان شاء الله
كيف اقوم بربط أداة progress bar مع عملية البحث في زر button
RE: ربط أداة progress bar مع عملية البحث - Rabeea Qbaha - 09-12-17
مرحبا صديقي
اذا عمليه البحث في ال datagridview :
عليك اول شيء ان تحصل على عدد الاسطر التي جرى البحث عنها وجعك القيمه الكبرى لل progress تساوي هذه القيمة
PHP كود :
ProgressBar1.MaximumValue = dt.Rows.Count
ProgressBar1.Value = 0
وبعد ذلك يجب ان تزيد قيمه ال progress عند اضافه كل سطر جديد :
PHP كود :
Dim i As Integer
For i = 0 To dt.Rows.Count - 1
DataGrid1.Rows.Add()
DataGrid1.Rows(i).Cells(1).Value = dt.Rows(i).ItemArray(0)
DataGrid1.Rows(i).Cells(2).Value = dt.Rows(i).ItemArray(1)
DataGrid1.Rows(i).Cells(3).Value = dt.Rows(i).ItemArray(2)
DataGrid1.Rows(i).Cells(4).Value = dt.Rows(i).ItemArray(3)
Dim due_date As DataGridViewComboBoxCell = DirectCast(DataGrid1.Rows(i).Cells(5), DataGridViewComboBoxCell)
ProgressBar1.Value = i + 1
Next