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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم مقالات VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=184)
+--- الموضوع : معلومة ::: StatusStrip (/showthread.php?tid=5278)

معلومة ::: StatusStrip - RaggiTech - 06-10-12

كاتب الموضوع : BADRMEDIA


أداة StatusStrip1 والمشهورة بشريط الحالة - لا غني عنها في أي تطبيق




بعد أن تضيفها من صندوق الأدوات - قم بالضغط عليها باليمين واختار Edit Items

وابدأ فى التعامل معها وأضف Label واكتب فيها ما تريد


ويمكن أن تفعل ذلك بالكود



كود :
Dim label As New ToolStripStatusLabel

label.Text = "www.BADRMEDIA.com"

StatusStrip1.Items.Add(label)

معلومة ::: StatusStrip - RaggiTech - 06-10-12

يمكن أن تضيف ProgressBar من نافذة التحرير لشريط الحالة وتعطيه بعض الخصائص وتحدد شكل ProgressBar


أو بالكود تنشأه


كود :
Dim ProgressBar As New ToolStripProgressBar

ProgressBar.Minimum = 0
ProgressBar.Maximum = 100
ProgressBar.Value = 50
ProgressBar.Style = ProgressBarStyle.Blocks

StatusStrip1.Items.Add(ProgressBar)

معلومة ::: StatusStrip - RaggiTech - 06-10-12

يمكن أن تضيف ToolStripDropDownButton

من نافذة التحرير لشريط الحالة وتعطيه بعض الخصائص ToolStripDropDownButton وتكون عناصر Collection للقائمة


أو بالكود تنشأه




كود :
Dim DropDownButton As New ToolStripDropDownButton
Dim MenuItem1 As New ToolStripMenuItem
Dim MenuItem2 As New ToolStripMenuItem


MenuItem1.Text = "Copy"
MenuItem2.Text = "Paste"
DropDownButton.DropDownItems.Add(MenuItem1)
DropDownButton.DropDownItems.Add(MenuItem2)

StatusStrip1.Items.Add(DropDownButton)