19-11-12, 04:39 PM
[COLOR="#0000FF"]
السلام عليكم :
من المنتدى القديم - معلومة ::: ProgressBar ( للاخ BADRMEDIA )
[SIZE=4][COLOR="#FF0000"]الموضوع للاخ بدر ميديا .. وما انا الا وسيلة اضع الموضوع بين ايديكم بعد ان فقد مع المواضيع البقية من المنتدى القديم
[/COLOR]
اداة ProgressBar
أو شريط التقدم - وهى الاداة الشهيرة التى نستخدمها لنعرف المستخدم ما الذى تم انجازه الان من العملية بنسبة كام من كام
==========================================
أهم الخواص
خاصية Minimum - Maximum
ونحدد فيها الحد الأعلي والحد الأدني لقيمة ProgressBar
الخاصية Step
نحدد منها معدل الزيادة لاداة ProgressBar أثناء التقدم
------------------------------------------------------
اضف أداة ProgressBar اجعل خصائص ProgressBar هكذا
اضف زر أمر وضع له هذا الكود
-----------------------------------------------------------------
يمكن أن نجعل الخاصية Style لاداة ProgressBar لها ثلاث تحركات للتقدم
__________________
بالنسبة لو كان Style هو Marquee
يمكن الاستفادة منه فى الانتظار
حيث نجد أن شريط التقدم يتحرك مثلما يتحرك لوجو بداية تشغيل ويندوز بالضبط
ويمكن تسريع هذا التحرك
اكتب هذا الكود فى كود تحميل الفورم
[/COLOR][/SIZE]
السلام عليكم :
من المنتدى القديم - معلومة ::: ProgressBar ( للاخ BADRMEDIA )
[SIZE=4][COLOR="#FF0000"]الموضوع للاخ بدر ميديا .. وما انا الا وسيلة اضع الموضوع بين ايديكم بعد ان فقد مع المواضيع البقية من المنتدى القديم
[/COLOR]
اداة ProgressBar
أو شريط التقدم - وهى الاداة الشهيرة التى نستخدمها لنعرف المستخدم ما الذى تم انجازه الان من العملية بنسبة كام من كام
==========================================
أهم الخواص
خاصية Minimum - Maximum
ونحدد فيها الحد الأعلي والحد الأدني لقيمة ProgressBar
كود :
ProgressBar1.Minimum = 0
ProgressBar1.Maximum = 100
الخاصية Step
نحدد منها معدل الزيادة لاداة ProgressBar أثناء التقدم
كود :
ProgressBar1.Step = 10
------------------------------------------------------
اضف أداة ProgressBar اجعل خصائص ProgressBar هكذا
كود :
ProgressBar1.Minimum = 0
ProgressBar1.Maximum = 100
ProgressBar1.Step = 10
اضف زر أمر وضع له هذا الكود
كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
For I As Integer = 0 To 59
ProgressBar1.PerformStep()
Application.DoEvents()
System.Threading.Thread.Sleep(1000)
Next
End Sub
-----------------------------------------------------------------
يمكن أن نجعل الخاصية Style لاداة ProgressBar لها ثلاث تحركات للتقدم
كود :
ProgressBar1.Style = ProgressBarStyle.Blocks
كود :
ProgressBar1.Style = ProgressBarStyle.Continuous
كود :
ProgressBar1.Style = ProgressBarStyle.Marquee
بالنسبة لو كان Style هو Marquee
يمكن الاستفادة منه فى الانتظار
حيث نجد أن شريط التقدم يتحرك مثلما يتحرك لوجو بداية تشغيل ويندوز بالضبط
ويمكن تسريع هذا التحرك
اكتب هذا الكود فى كود تحميل الفورم
كود :
ProgressBar1.Minimum = 0
ProgressBar1.Maximum = 100
ProgressBar1.Style = ProgressBarStyle.Marquee
ProgressBar1.MarqueeAnimationSpeed = 100