Doug
19 avril 2010 à 18:47
La fonction rnd n'est pas par définition si aléatoire que cela. Elle se base sur la même suite.
Pour resumé, arrivé a un certain nombre de tirage vous retrouverez continuellement la même suite.
Afin d'affecter a rnd une variable aléatoire il faut initialiser le pas de la fonction grâce à la fonction Randomize (qui se base elle sur l'heure de l'ordinateur).
Ainsi, le pas de départ de la fonction rnd sera toujours différents.
Pour votre exemple cela donnerait :
Dim valeur as integer
Randomize()
valeur=CInt(rnd()*98+1)