Rnd je comprend pas !!!

Question

Bonjour, j'ai un truc que je comprend pas .

Pour moi  Int(rnd*500) me donne un nombre aleatoire jusqu'a 500   ok ca marche   Mais par contre à chaque fois que je lance mon project  je me retrouve toujours avec le meme ordre de sortie  par exemple  4, 102, 25, 34, 72.... et si  je relance le project   de nouveau  4, 102, 25, 34, 72....   donc je souhaite n'avoir jamais les memes ordres de sortie  comment faire ? 

si c'est par la fonction randomize  je ne sais pas l'utiliser

j'attend vos conseils   (pas trop de complexité car je debute)

merci  @+

Arsena · Answer

essaye ça

Randomize (Time)
x = Int(Rnd * 500)

Bonne prog et A+
MD

Arsena · Answer

Un petit exemple
Colle ce bout de prog dans une form 

Private Sub Form_Load()
Dim x, i
Randomize (Time)

For i = 1 To 5
x = Int(Rnd * 500)
MsgBox "rnd = [ " & x & " ]   Clique 5 fois sur OK pour stoper"
Next i

End Sub

A+
MD

Tilois · Answer

La fonction randomize donne ce par rapport a quoi les nombre pseudo aléatoires sont tirés. Par randomize Time on les met par rapport a l'horloge interne du pc. Comme celle ci change tout le temps, alors, les nombre tirés semblent plus aléatoires.

crenaud76 · Answer

Il est inutile de transmettre la valeur de la focntion Time à Randomize, car sans argumetn, Randomize se base sur cette valeur !! 
Randomize tout court fonctionnera tres bien 

Christophe R.

Rnd je comprend pas !!!

4 réponses

Discussions similaires