[elgokr]

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

استبدل الكود الخاص بك بالكود التالى

كود :

       Dim search As Boolean = False
       For Each row As DataGridViewRow In DataGridView2.Rows
           If row.Cells(0).Value = SearchTextBox.Text Then
               TextBox4.Text = "phone no is ready"
               search = True
               MoveNext.Enabled = True
               Exit For
           Else
               search = False
           End If
       Next
       If Not search Then
           TextBox4.Text = "Not yet "
           CheckedListBox2.Items.Add(SearchTextBox.Text)
           MoveNext.Enabled = True
       End If

تحياتى لك

وتمنياتى لك التوفيق