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
