Suite aléatoire ayant toujours les memes valeurs à l'appui sur un bouton

Résolu
cs_makito Messages postés 47 Date d'inscription mardi 31 octobre 2000 Statut Membre Dernière intervention 21 février 2008 - 5 juin 2005 à 23:04
cs_makito Messages postés 47 Date d'inscription mardi 31 octobre 2000 Statut Membre Dernière intervention 21 février 2008 - 6 juin 2005 à 01:12
Voici ce que je souhaite faire :
quand je clique sur un bouton, je veux une suite aléatoire de 10 chiffres, mais lorsque je reclic sur ce bouton, je voudrai retrouver exactement les 10 memes chiffres, je ne sais pas du tout si c'est possible.

Voici le code de mon bouton :

Dim valeur As Integer

Randomize 15

For i = 1 To 10
valeur = Int(Rnd() * 100) + 1
MsgBox valeur
Next i

Cela marche lorsque je quitte le programme et que je rappuie sur le bouton mais je n'obtiens pas la même suite de 10 chiffres lorsque j'appuie une deuxième fois sur le bouton.
A voir également:

2 réponses

Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 34
5 juin 2005 à 23:47
place un Rnd avec un nombre négatif devant le Randomize.

n'importe quel nombre fera l'affaire.



Rnd (-1)

Randomize 15


Daniel
3
cs_makito Messages postés 47 Date d'inscription mardi 31 octobre 2000 Statut Membre Dernière intervention 21 février 2008
6 juin 2005 à 01:12
Merci bien Daniel, ça marche comme je veux ! Thanks
0
Rejoignez-nous