Consultas desde vb a bd de access

Hola expertos.
Bien gracias por leer mi pregunta.
Trabajo en un proyecto de visual basic 6.0, y una base de datos en access.
Manejo la opción de búsqueda.
La cuestión es la siguiente: la búsqueda se basa en dos campos, de la tabla, es decir: " busca al equipo que tenga categoría LIBRE y además que pertenezca al grupo 1.
Mis datos ( LIBRE, 1) son obtenidos median te un input.
Mi código es el sig:
a = "CATEGORIA DEL EQUIPO"
              b = InputBox(b, "CATEGORIA")
              c = InputBox(c, "GRUPO")
               If b <> "" Then
consulta = "SELECT * From  grupos where grupos.categoria  = '" & Trim(b) & "' and grupos.grupos = '" & Trim(c) & "' "
               ABREBD
   rs.Open consulta, Conectar
          If Not rs.EOF Then                
   i = 0
      rs.MoveFirst
        Do While Not rs.EOF = True
       i = i + 1
       'Grid.TextMatrix(i, 1) = rs!nombre
    'Grid.TextMatrix(i, 2) = rs!categoria
    MSFlexGrid1.TextMatrix(i, 1) = rs!nombre
          MSFlexGrid1.AddItem ""
      rs.MoveNext
            Loop
            End If
MSFlexGrid1.RemoveItem (i + 1)
         CIERRABD
         End If
Exit Sub
Errores:
Como ven el input aparece dos veces, y la verdad no se ve bien, ¿se puede que usando solo un input teclee ambos datos y los busque?