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

[COLOR="#0000FF"]السلام عليكم

من المنتدى القديم - معلومة ::: CheckBox ( الموضوع للاخ BADRMEDIA )

أداة صندوق الاختيار CheckBox الشهيرة

كما هي ولكن سنتعرف على المزايا فيها

=============================

مثلاً عند اختبار حالته

كود :

If CheckBox1.Checked Then

            MessageBox.Show("الاختيار مفعل")

        Else

            MessageBox.Show("الاختيار غير مفعل")

        End If

If CheckBox1.Checked Then مثل If CheckBox1.Checked = True Then

لأن فى حالة Checked يكون يساوى True

لكن هو له ثلاث حالات

Checked

Unchecked

Indeterminate - حالة جديدة

لكن من أجل استخدام الثلاث حالات لابد من تفعيل الخاصية ThreeState وتجعلها تساوي True

كود :

CheckBox1.ThreeState = True

ونجد أن المستخدم عندما يضغط على العنصر يتم التبديل بين الثلاث حالات

كود :

Select Case CheckBox1.CheckState

            Case CheckState.Checked

                MessageBox.Show("حالة أولي")

            Case CheckState.Indeterminate

                MessageBox.Show("حالة ثانية")

            Case CheckState.Unchecked

                MessageBox.Show("حالة ثالثة")

        End Select

[/COLOR]

شكراً جزيلاً و جزاك الله خيراً

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

المبرمج علي نوري

مبرمج أوتار