[URG] Variables aléatoires entre plusieurs nombres

Résolu
BlackDiff Messages postés 21 Date d'inscription jeudi 20 janvier 2005 Statut Membre Dernière intervention 8 décembre 2005 - 8 déc. 2005 à 19:28
cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 - 8 déc. 2005 à 19:41
Problème VB6.0



Bonjour à tous !

J'ai un problème urgent à vous soumettre...et normalement tout simple !

J'ai 11 nombres : 00 10 20 30 40 50 60 70 80 90 et 100 et je voudrais
que lorsque je clik sur un bouton, il me retourne aléatoirement un de
ces nombres ! Pour l'instant je suis partis sur x = Int (a * Rnd) + 1
en déclarant sur le form Randomize. Mais je ne vois pas trop comment je
peux m'en sortir avec ce calcul.



Merci de votre aide c'est urgent !!



@+

3 réponses

Utilisateur anonyme
8 déc. 2005 à 19:35
Bonsoir

Tout simplement:
Un nombre alèatoire entre 0 et 10. Puis ce nombre fois 10
x = Int(11 * Rnd) * 10

Kenji
<hr size="2" width="100%">
Merci de cliquer sur "Réponse acceptée" si une réponse vous convient.
3
cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 79
8 déc. 2005 à 19:41
Salut
Tes chiffres sont remarquables : Ils vont de 0 à 100, de 10 en 10.
Il suffit donc de fabriquer un nombre entier entre 0 et 10 et de le multiplier par 10.
Pour faire un nombre entier entre 0 et 10, il suffit de générer un nombre aléatoire entre 0 et 1 avec RND, puis de le multiplier par 10.
Si tu avais lu quelques sources et messages sur le forum ou consulté l'aide de la fonction RND, tu aurais trouvé de suite :
Rnd fournit un chiffre entre 0.0 et 1.0 (à virgule flottante)
Nombre = Int(Rnd() * 10 * 10)
Si tes chiffres ne sont pas aussi remarquables :
Par exemple, s'il fallait choisir entre ces 11 chiffres : 00 12 21 28 55 66 74 88 91 92 93
Là, il foudrait procéder autrement :
- Créer un tableau de 11 variables : Dim Tableau(10) As Long ' les tableaux commencent à l'index 0- Stocker les valeurs dedans : Tableau(0) 00 : Tableau(1) 12 ...
- Choisir aléatoirement parmi les 11 variables : Choix = Int(Rnd() * 10)
- Le chiffre associé est Tableau(Choix)

Vala
Jack, MVP VB
NB : Je ne répondrai pas aux messages privés

Le savoir est la seule matière qui s'accroit quand on la partage. (Socrate)
3
BlackDiff Messages postés 21 Date d'inscription jeudi 20 janvier 2005 Statut Membre Dernière intervention 8 décembre 2005
8 déc. 2005 à 19:38
Merci j'y avais vraiment pensé !!



encore MERCI !
0
Rejoignez-nous