[صالح عبدالله]

السلام عليكم ورحمة الله وبركاته 

 عملت checkedlistbox ثم عملت CHecked  لبعض العناصر سؤالي كيف أستطيع نقل محتويات checkedlistbox المحددة فقط وليس كل ITEMS  الى داتا قريد فيو  
قمت بعمل كود ولكن ينقل آخر   ITEM  قمت بإختياره ولا ينقلها جميعها وهذا هو الكود المستخدم

        Dim cmd As New SqlCommand("select * from Student_Data", Sqlcon)

        Dim Adaptr As New SqlDataAdapter(cmd)

        Dim dt1 As New DataTable

        Adaptr.Fill(dt1)

        Dim i1 As Integer

        For i1 = 0 To CheckedListBox1.Items.Count - 1

            If CheckedListBox1.GetItemChecked(i1) Then

                Dim i As Integer

                For i = 0 To dt1.Rows.Count - 1

                    If dt1.Rows(i)(2).ToString = CheckedListBox1.GetItemText(CheckedListBox1.SelectedItem) Then

                        TextBox1.Text = dt1.Rows(i)(1).ToString

                        TextBox2.Text = dt1.Rows(i)(2).ToString

                        TextBox3.Text = dt1.Rows(i)(3).ToString

                        DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(1).Value = TextBox1.Text

                        DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(2).Value = TextBox2.Text

                        DataGridView1.Rows(DataGridView1.Rows.Count - 1).Cells(3).Value = TextBox3.Text

        

                    End If

                Next

            End If

        Next