vb Recordset busqueda multiple

[calichet]

Hola:

Mi inquietud es la siguiente:

estoy desarrolando en vb 6.0, tengo un Adodc con los datos de la tabla auxiliar, estan en un datagrid:
TABLA VAL1 VAL2 DESCRIPCION
Estado_Civil C 2 CASADO
Estado_Civil S 1 SOLTERO
Forma_Pago 1 1 EFECTIVO
Forma_Pago 2 2 CHEQUE
Frec_Pago 3 3 QUINCENAL
Frec_Pago 4 4 MENSUAL
Genero F 2 FEMENINO
Genero M 1 MASCULINO
Tipo_Sangre A+ 1 A+
Tipo_Sangre AB+ 5 AB+
..... Etc, Etc.

Ahora bien hago un llamado sql a una tabla PERSONAS con N campos, en uno de ellos existe el Genero, en otro Tipo_Sangre, Etc, Etc.

Como hago para recorrer la tabla PERSONAS, realizando busquedas en la tabla auxiliar, de acuerdo a la necesidad de busqueda (Estado civil, Genero, Tipo Sangre, etc), registro por registro.

Tengo que reportar las inconsistencias.... que no coincidan, no existan, en blanco, null, etc
/**********************/
Sql2 = "Select * from Auxiliar"
With Ado2
.ConnectionString = ConxStr
.CommandType = adCmdText
.RecordSource = Sql2
.Refresh
End With
With Grd_Data
Set .DataSource = Ado2.Recordset
.Refresh
End With
/**********************/
SQL = "Select * from Personas"
Registros.Open Sql, Conexion, adOpenDynamic, adLockOptimistic
Registros.MoveFirst
Do While Not Registros.EOF
?????????????????????
Registros.MoveNext
Loop
/**********************/
Agradezco la ayuda, lo mas pronto posible.... gracias