[ابو ليلى]

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

ضع هذه الدالة لديك

PHP كود :

   Private Async Function ListChange() As Task(Of Integer)
        For i As Integer = 0 To CheckedListBox1.Items.Count - 1

            If CheckedListBox1.GetItemChecked(i) = True And TextBox2.Text.Contains(CheckedListBox1.Items(i).ToString) = False Then

                If TextBox2.Text = "" Then
                    TextBox2.AppendText(CheckedListBox1.Items(i).ToString)
                Else
                    TextBox2.AppendText(" ; " + CheckedListBox1.Items(i).ToString)
                End If
                TextBox1.Focus()

            End If
        Next
        Await Task.Delay(100)
        Return 0
    End Function 


وضع في الحدث التالي TextBox1_KeyPress  هذا الكود

PHP كود :

   Private Async Sub TextBox1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles TextBox1.KeyPress
        If e.KeyChar = ChrW(13) Then
            For x As Integer = 0 To CheckedListBox1.Items.Count - 1
                If CheckedListBox1.Items(x).ToString.Contains(TextBox1.Text) Then
                    CheckedListBox1.SetItemChecked(x, True)
                End If
            Next
            e.Handled = True
        End If
        Await ListChange()

    End Sub 


و ان شاء الله تنحل مشكلتك