Private ObjCon AsNew OleDb.OleDbConnection

Private ObjCom AsNew OleDb.OleDbCommand
Dim cs AsString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\damas90\My Documents\Bank.mdb"
PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ObjCon.ConnectionString = cs
ObjCon.Open()
ObjCom.Connection = ObjCon
ObjCom.CommandText = "insert Into Table1(ID,name,family) Values('" & TextBox1.Text & " ' ,' " & TextBox2.Text & " ' , ' " & TextBox3.Text & " ')"
ObjCom.ExecuteNonQuery()
EndSub
با عرض سلام
قطعه كد بالا براي اضافه كردن ركورد به بانك اكسسه
حالا اگر خواسته باشيم كدي بنويسيم كه از textbox4 مقداري بگيريد وبا كليك رو كليد جستجوكند كه آيا مقدار textbox4 در ID بانك هست يا نيست بايد چجوري بنويسيم؟؟
منظورم همون search در بانك اكسسه؟؟
كسي هست كمكم كنه؟؟