منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : معلومة ::: StatusStrip
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
كاتب الموضوع : BADRMEDIA


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




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

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


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



كود :
Dim label As New ToolStripStatusLabel

label.Text = "www.BADRMEDIA.com"

StatusStrip1.Items.Add(label)

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


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


كود :
Dim ProgressBar As New ToolStripProgressBar

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

StatusStrip1.Items.Add(ProgressBar)
يمكن أن تضيف 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)