Visual Basic - Ayuda con Busqueda de palabras

Hola a todos y todas de este foro.

Necesito hacer una busqueda de productos que tengo en mi base de datos de access 2000, ingresando el nombre del producto que me busque dicho producto, yo lo hice con sentencias SQL pero no me busca nada, siempre me coloca el primer registro que tengo en mi base de datos. Aqui coloco mi codigo que hice para ver si me pueden corregir y ayudar:

Set BuscarNomb = New ADODB.Recordset
BuscarNomb.CursorType = adOpenDynamic
BuscarNomb.LockType = adLockOptimistic
BuscarNomb.CursorLocation = adUseClient
BuscarNomb.Open "SELECT * FROM Producto", Conexion
SQL = "SELECT * FROM Producto WHERE Nombre_Producto LIKE ' " & txtBuscar.Text & " %'"
InvNombre.Text = BuscarNomb!Nombre_Producto
InvPrecio.Text = BuscarNomb!Precio_Producto
InvCantidad.Text = BuscarNomb!Cantidad_Producto

MUCHAS GRACIAS DE ANTEMANO Y ESPERO QUE ME PUEDAN AYUDAR.

para que se haga mas facil Trata de trabajar con un control data y dbgrid si estas manipulando la información desde visual basic. o sino, busca el producto tambien por su código clave

para simplificar las cosas te conviene vincular una tabala a un objeto Adodc por ejemplo, de esta manera podes tomar en una tabla todos los datos que quieras y como te muestro en este ejemplo desde una cuadro de textos, a medida que vas escriviendo un nombre se va actualizando la tabla. esto se copia en el keyup del cuadro de texto

PNombre.RecordSource = "select CodCliente, NOMBRE, Dni, Observaciones, Direccion, Telefono from Cliente WHERE Nombre like '" & Text1.Text & "%' order by NOMBRE"
pNombre.Refresh
DataGrid1.Refresh

PNombre es el objeto Adodc

Muchas Gracias a todos los que me ayudaron, se lo agradezco, pero sigue igual busca solo el primer registro de la tabla, lo coloque de mil maneras pero siempre sigue busca el primer registro, no se que pueda ser si alguien me quiere seguir ayudando c lo agradecere mucho....

Marcos, en tu código vos ponés

BuscarNomb.Open "SELECT * FROM Producto", Conexion
' Con el código anterior vos creas el recordset
'Y con este código que haces?
SQL = "SELECT * FROM Producto WHERE Nombre_Producto LIKE ' " & txtBuscar.Text & " %'"

Deberías colocar el código de la siguiente manera

SQL = "SELECT * FROM Producto WHERE Nombre_Producto LIKE ' " & txtBuscar.Text & " %'"
BuscarNomb.Open SQL, Conexion

Entonces si si existe la coincidencia, te devolvería un recordset con los datos hallados