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

ProgressBar - مبتدئ - 16-03-13

كيف اضافه رقم مثلآ يكون value بتاع ProgressBar 40
اما يوصل عند اربعين
انا اريد مثلآ بدل ما اكتب if ProgressBar.value = 40 then
Label1.text = 40
Elseif ProgressBar.value = 41
Label1.text = 41
End if
اريد بدل مكتب 40-41-42-43-الخخخخخخخخخخخخ
يكون كود مثلا الركم 40 لى 50 يكتب يكتب كل ما يوصل لى 40 الى فوق لغايه 50 يكتب 41 42
يمكن عمله بى هذا الكود Label1.text = ProgressBar.value لاكن انا لا اريضه بهذا الكود فهل يوجد كود بلطريقه ؟

ProgressBar - أبو يعقوب - 16-03-13

Label1.text =ProgressBar.Value

هذه طريقة ميكانيكية سليمة وقوية، لماذا تبحث عن طريقة أخرى ؟

ProgressBar - kslawy - 16-03-13

أبو يعقوب كتب :Label1.text =ProgressBar.Value
هذه طريقة ميكانيكية سليمة وقوية، لماذا تبحث عن طريقة أخرى ؟


كود :
If ProgressBar1.Value >= 40 AndAlso ProgressBar1.Value <= 50 Then
               Label1.Text = ProgressBar1.Value
           End If

*****
****
***
**
*

ProgressBar - مبتدئ - 16-03-13

أبو يعقوب كتب :Label1.text =ProgressBar.Value

هذه طريقة ميكانيكية سليمة وقوية، لماذا تبحث عن طريقة أخرى ؟
اجل اخى هذه الصريفة صحيحه 100% لاكن بهذه الطريقة كل 1 زياده فى value = 1 زياده فى اللابيل
kslawy كتب :
كود :
If ProgressBar1.Value >= 40 AndAlso ProgressBar1.Value <= 50 Then
               Label1.Text = ProgressBar1.Value
           End If

*****
****
***
**
*
جزاك الله خير اخى