Visual Basic - SEEK

Hola compañeros, consulto tablas de AS/400 a través de un programa de visual basic pero al consultar varias tablas a la vez el proceso es lento, lo que busco es saber como funciona exactamente el método "seek" ya que intento meterle varios parámetros de búsqueda y siempe me sale el primer registro de la tabla.
Sé que se tiene que coger un tabla con campos indexados para buscar pero ya es lo que he hecho y no hay forma.

Un saludo!

a ver, para usar seek primero le tienes que indicar por que indice de la tabla vas a buscar esto es:

dim r as recordset
set r=BD.OPENRECORDSET("tabla",dbopentable)
r.index="PrimaryKey" 'o el nombre que le hayas dado a tu indice
r.seek "=", primer_campo_de_la_clave, segundo_campo_de_la_clave, ...
if r.nomath then
'no lo ha encontrado
else
'puede que lo haya encontrado
'tinenes que comprobarlo
if r(0)=clave1 and r(1)=clave2 etc... then
'realmente lo ha encontrad

espero te haya sido de ayuda

Hola de nuevo, muchas gracias por contestarme pero he intentado poner el código que tu me has puesto tal cual y adaptandolo y se me para en la línea del set r=bd.openrecordset... me dice que se requiere un objeto.

Un saludo.

set r=bd.openrecordset(...)