فحص العناصر في اداة CheckedListBox1

تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] فحص العناصر في اداة CheckedListBox1
#1
اريد فحص اذا تم تحديد وعمل شيك لاي عنصر من عناصر الاداة اذاتم اختيار عنصر واحد او لم يتم اختيار اي عنصر  بحيث لو لم يتم اختيار عنصر واحد تظهر الاداة ولايخرج منها الا بعد اختيار عنصر منها



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


 Dim itemChecked As Object
            For Each itemChecked In CheckedListBox1.CheckedItems
                If itemChecked = False Then
                    CheckedListBox1.Visible = True
                    CheckedListBox1.Focus() : Exit Sub
                End If
            Next
الرد
تم الشكر بواسطة:
#2
تأكد عن طريق CheckedListBox1.CheckedItems.Count فإذا كان أكبر من صفر فهناك عنصر أو أكثر تم اختياره

PHP كود :
If CheckedListBox1.CheckedItems.Count 0 Then
    CheckedListBox1
.Show()
 
   CheckedListBox1.Focus()
    Exit 
Sub
End 
If 
الرد
تم الشكر بواسطة: محمد اسماعيل
#3
(10-12-17, 09:06 PM)طالب برمجة كتب : تأكد عن طريق CheckedListBox1.CheckedItems.Count فإذا كان أكبر من صفر فهناك عنصر أو أكثر تم اختياره

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

الف شكر اخي الكريم الكود ظبط معايا
الرد
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  مساعدة في تطبيق هذا الدرس لتحديث اداة WebBrowser ahmedhhh2 5 69 10-08-18, 05:20 PM
آخر رد: ahmedhhh2
Exclamation ما هذا ؟ مشكلة في اداة ShockwaveFlash لعرض فيديوهات الـ Youtube YousefOkasha 6 146 22-07-18, 04:59 PM
آخر رد: YousefOkasha
  [سؤال] اداة tooltip لا تظهر في المكان الصحيح لماذا واستفسار؟ dametucorazon 2 70 04-07-18, 05:19 PM
آخر رد: dametucorazon
  تجميع العناصر المتشابهة في الداتاجريد الاولي في جريد ثانية atefkhalf2004 24 482 24-05-18, 12:45 AM
آخر رد: hatem555
  كود اظهار الصورة من قاعدة البيانات الى اداة الصورة aftfm 2 125 30-04-18, 11:40 PM
آخر رد: aftfm
  [سؤال] استخدام الكوكيز مع اداة ويب براوزر عبدالرحمن المكاوي 4 175 22-04-18, 12:26 AM
آخر رد: عبدالرحمن المكاوي
  [VB.NET] جعل الحقل الثالث في اداة dgv تكون combobox tarek 5 206 05-04-18, 01:10 AM
آخر رد: ahmedmansour
  كود / لو اردت ان اكتب على اداة القرايد ويظهر النص في تكست بوكس nooralcown 3 105 13-02-18, 01:21 AM
آخر رد: nooralcown
  [مشروع] Create Cydia tools || اداة لإنشاء ادوات السيديا سعود الشامان 3 104 13-02-18, 12:21 AM
آخر رد: سعود الشامان
  [مشروع] تطوير اداة Info Hashs لعرض معلومات Hashs سعود الشامان 1 113 30-01-18, 02:24 AM
آخر رد: سعود الشامان

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم