Comment mélanger aléatoirement une liste de nombres entiers ???

Question

Hello,
J'ai un probleme : Comment pourrais-je "randomizer" une liste qui contient 100 nombres (toujours les même : en fait c'est 2 fois tout les entiers de 1 à 50) Il me faudrais un "algorithme" assez simple pour pouvoir mélanger aléatoirement les 100 nombres de cette liste.
Merci d'avance !

-\|/-\|/-\|/-\|/-\|/-\|/-\|/-\|/-\|/-\|/-\|/-\|/-\|/-\|/-\|/-\|/
Jo's est de retour ...

[mailto:JoVB@freesurf.ch mailto:JoVB@freesurf.ch]

cs_rene38 · Answer

Bonsoir.
Une idée :

Les 100 nombres sont dans la ListBox List1
On les met en désordre dans la ListBox List2 :

For j = 100 To 1 Step -1
   Randomize
   Rang = Int(Rnd * j)
   List2.AddItem List1.List(Rang)
   List1.RemoveItem (Rang)
Next j

JoVB · Answer

Merci beaucoup !!!
Ca marche très bien  :big) , je pensait pas que c'était si simple !!
Encore merci, et à bientôt... [;)
Jo's est de retour ...

[mailto:JoVB@freesurf.ch mailto:JoVB@freesurf.ch]

Comment mélanger aléatoirement une liste de nombres entiers ???

2 réponses

Discussions similaires