تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
كود قراءة البيانات من ChekedBoxLis
#1
السلام عليكم ورحمة الله وبركاته ..

لدي كود لحفظ البيانات من قائمة ChekedBoxList  في حقل واحد على هذه الهيئة
إقتباس :0;1;2
وخذا كود الحفظ :
كود :
Dim checkedItemsList As Integer() = New Integer(CheckedListBox1.CheckedIndices.Count - 1) {}
       Dim sb As New StringBuilder()
       For i As Integer = 0 To CheckedListBox1.CheckedIndices.Count - 1
           checkedItemsList(i) = CheckedListBox1.CheckedIndices(i)
           sb.Append(checkedItemsList(i))
           sb.Append(";")
       Next
       CheckedListBox1.Tag = sb


       Dim cmd As New SqlCommand("Insert into tb values('" & sb.ToString() & "')", connDB)
       Dim iCount As Integer = cmd.ExecuteNonQuery()
       connDB.Close()

وأبحث عن كود لقرائتها من الحقل وأظهارها على ChekedBoxList  أي العكس

لدي كود لكن لا يعمل

كود :
       Dim intersts As String = ""
       Dim cmd As New SqlCommand("Select Interests from tb", connDB)

       Dim dr As SqlDataReader
       dr = cmd.ExecuteReader()
       If dr.Read() Then
           intersts = dr("Interests").ToString()
       End If
       connDB.Close()

     

       For Each i As ListItem In CheckedListBox1.Items
           For Each s As String In intersts.Split(";"c)
               If i.Value = s Then
                   i.Selected = True
                   Exit For
               End If
           Next
       Next
لكن هذا الكود يظهر رسالة خطأ :
إقتباس :Type 'ListItem' is not def
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  أستفسار عن قراءة الاسطر altoki939 6 114 27-03-24, 10:07 AM
آخر رد: altoki939
  [VB.NET] حل مشكلة الاتصال بقواعد البيانات access loay775 2 158 25-02-24, 06:29 AM
آخر رد: loay775
  سؤال عن عملية حذف سجل من قاعدة البيانات assuhimi 3 249 11-02-24, 08:43 PM
آخر رد: assuhimi
  [VB.NET] منع تكرار البيانات في عند الادخال مبرمج صغير 1 2 255 24-01-24, 05:18 PM
آخر رد: مبرمج صغير 1
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 275 18-01-24, 05:04 PM
آخر رد: loay775
  [VB.NET] إعادة استدعاء البيانات من قاعدة بيانات اكسس والاهم الصورة مبرمج صغير 1 1 273 13-01-24, 01:17 PM
آخر رد: مبرمج صغير 1
  [كود] اريد كود إرسال البيانات من الفيجوال بيسك إلىPDF issamsaidd 10 5,829 25-12-23, 06:30 PM
آخر رد: الحزين اليماني
  جملة الاتصال بقاعدة البيانات اكسس محمد خيري 4 364 12-12-23, 03:14 AM
آخر رد: محمد خيري
  كود الاتصال بقاعدة البيانات sqlserver strongriseman 2 421 29-11-23, 09:25 PM
آخر رد: العتيق
Heart [VB.NET] كيفية جعل الدتاجريديد فيو تظهر عندما تكون قاعدة البيانات فارغه الحزين اليماني 1 371 22-11-23, 05:31 PM
آخر رد: justforit

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


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