tmp est entier = listeselect(combo)
i est entier
pour i=1 a listeoccurence(combo)

    si i <> tmp alors
        Listeselectplus(combo,i)
        Tableajoute(combo..valeurAffiché)
    sinon
     // ne fais rien
    fin
fin