منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] فحص العناصر في اداة CheckedListBox1 - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] فحص العناصر في اداة CheckedListBox1 (/showthread.php?tid=22876)



فحص العناصر في اداة CheckedListBox1 - محمد اسماعيل - 10-12-17

اريد فحص اذا تم تحديد وعمل شيك لاي عنصر من عناصر الاداة اذاتم اختيار عنصر واحد او لم يتم اختيار اي عنصر  بحيث لو لم يتم اختيار عنصر واحد تظهر الاداة ولايخرج منها الا بعد اختيار عنصر منها



استخدمت الكود التالي ولم يعمل معي


 Dim itemChecked As Object
            For Each itemChecked In CheckedListBox1.CheckedItems
                If itemChecked = False Then
                    CheckedListBox1.Visible = True
                    CheckedListBox1.Focus() : Exit Sub
                End If
            Next


RE: فحص العناصر في اداة CheckedListBox1 - طالب برمجة - 10-12-17

تأكد عن طريق CheckedListBox1.CheckedItems.Count فإذا كان أكبر من صفر فهناك عنصر أو أكثر تم اختياره

PHP كود :
If CheckedListBox1.CheckedItems.Count 0 Then
    CheckedListBox1
.Show()
 
   CheckedListBox1.Focus()
    Exit 
Sub
End 
If 



RE: فحص العناصر في اداة CheckedListBox1 - محمد اسماعيل - 10-12-17

(10-12-17, 09:06 PM)طالب برمجة كتب : تأكد عن طريق CheckedListBox1.CheckedItems.Count فإذا كان أكبر من صفر فهناك عنصر أو أكثر تم اختياره

PHP كود :
If CheckedListBox1.CheckedItems.Count 0 Then
    CheckedListBox1
.Show()
 
   CheckedListBox1.Focus()
 
   Exit Sub
End 
If 

الف شكر اخي الكريم الكود ظبط معايا