Hloto : tirage de loto 6/49

Soyez le premier à donner votre avis sur cette source.

Vue 10 560 fois - Téléchargée 748 fois

Description

Ultra simple, pour apprendre à se servir de la fonction Rnd, et d'une méthode de tri de tableau.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

bilaloch
Messages postés
554
Date d'inscription
lundi 6 octobre 2003
Statut
Membre
Dernière intervention
9 juillet 2014
-
Bon code. 8/10.

@ +

BILALoch
econs
Messages postés
4066
Date d'inscription
mardi 13 mai 2003
Statut
Modérateur
Dernière intervention
23 décembre 2008
18 -
Juste une petite remarque (c'est vraiment pour en faire une ! lol)

Le commentaire ci dessous indique 6 nombres, alors qu'en fait ils sont 7 (de 0 à 6).


---------------------------------------
Private Sub Tirage_Click()
[...]
' Génération des 6 nombres au hasard ...
For i = 0 To 6
Do
n = Int(MaxNo * Rnd + 1)
[...]

' Affichage des 6 nombres avec intervale de 300 millisecondes
For i = 0 To 6
[...]
End Sub

-------------------------------------------------
C'est du pinaillage, mais çà ne jouera pas sur la note ;o)
henriolva
Messages postés
18
Date d'inscription
samedi 28 décembre 2002
Statut
Membre
Dernière intervention
12 septembre 2005
-
> econs

Effectivement, il s'agit en tout de 7 nombres, le 7ème étant le fameux "numéro complémentaire".
Donc les commentaires sont effectivement faux.
Dans la routine de tri, seuls les 6 premiers nombres sont triés par ordre croissant.
cs_clementpat
Messages postés
406
Date d'inscription
lundi 2 décembre 2002
Statut
Membre
Dernière intervention
25 janvier 2014
-
salut a toi , toujours du code tres propre ;
une idée de programme :
charger sur le net l'ensemble des n° deja sorties depuis la creation du loto ;
transformé ton prog pour qu'il ne sorte que des combinaisons NON sorties (ex: tirages d'une grille de 6 n° renfermant le plus de combinaison de trois n° non sortie ) ( faire le méme pour combi de 4 , de 5 et eventuellement de 6 )
programme qui se reactualiserai a chaque demarrage par le net .
voila un programme qui pourrai etre interressant .
amicalement/
kefran54
Messages postés
3
Date d'inscription
jeudi 1 décembre 2005
Statut
Membre
Dernière intervention
17 janvier 2006
-
tu fais de la publicité mensongère, il y a aucun msflexgrid dans ton programme
merci

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.