urente!! repeticion de datos combo

[Sergestux]

para hacer lo que deseas, se me ocurre algo que no es optimo pero al menos funcionaria.

Código vb:

While Not dsArticulos.Recordset.EOF
                  if  (ItemRepetido(dsArticulos.Recordset!laboratorio))
                    CboLaboratorio.AddItem (dsArticulos.Recordset!laboratorio)
            dsArticulos.Recordset.MoveNext
      Wend
 
 
 
private sub ItemRepetido(laboratorio) boolean
{
...
      CONT=0;
      While Not dsArticulos.Recordset.EOF
                  if (dsArticulos.Recordset!laboratorio == laboratorio)
                      CONT=CONT+1;
            dsArticulos.Recordset.MoveNext
      Wend
 
     if (CONT>1)
        ItemRepetido=false;
     else
        ItemRepetido=true;
}
 

Es un tipo de pseudocodigo que la verdad ya no se ni en que lenguaje lo puse