Private Sub Button9_Click(ByVal sender As System., ByVal e As System.EventArgs) Handles Button9.Click If Me.KharidBindingSource.Find("nam", TextBox2.Text) < 0 Then MessageBox.Show("er") Else KharidBindingSource.Position = Me.KharidBindingSource.Find("nam", TextBox2.Text) MessageBox.Show("ok") End If End Sub