siang juragan2 ane newbie baru belajar vb.net 2010 ane mo tanya apakah klo mo buat menu cari bisa seperti ini

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Textcari.TextChanged
If RBCif.Checked = True Then
'Filter kode buku seperti / Like txtcari.text (ini tergantung input dari user)
Textcari = New OleDbCommand("SELECT * FROM VIEWBOOKS WHERE Customer code LIKE '%" & Textcari.Text & "%'")
'Jika yang dicari tidak ada kosongkan datagrid view / tabel data
If DataGridView1.Rows.Count = 0 Then
'Jika yang dicari ada, munculkan juga di datagrid view
DataGridView1.DataSource = Textcari
Textcari.Focus()
Else
DataGridView1.DataSource = Textcari
End If
End If

End Sub


ada eror di tulisan biru itu gmn ya,. ane pake datagrid1 buat sumberdatanya
dan datagrid1 buat nampilin datanya juga conto di gambar gan

ini foto erornya


mohon bantuannya agar masalah ini bisa teratasi hehehe
makasih