Le loto finder pour vous aider à trouver la combinaison !!

Soyez le premier à donner votre avis sur cette source.

Vue 15 007 fois - Téléchargée 1 118 fois

Description

Bientôt Noël, je suis sure que cela vous arrangerai bien de gagner au Loto!! et comme vous avez autant de chance de gagner avec une combinaison sortie d'un zinzin aléatoire que de prendre les éternels chiffres de votre date de naissance ou anniversaire de mariage, j'ai donc re-bidouiller ce code fait à l'origine par un collègue et je l'ai adapté pour qu'il soit compatible au loto Français, Belge et Suisse
Alors bonne chance !!

Conclusion :


Je ferais peut être un jour un truc plus compliqué avec une BD regroupant tous les tirages et une mathématique plus complexe sur les calculs de probabilités. Sinon je ne connais pas de bugs pour l'instant enfin à voir...
A j'oubliais si l'un d'entre vous tire la combinaison gagnante grace à ce petit prog. je ne demande que 10% sur le gain ben oui c'est normal non ??

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
1
Date d'inscription
lundi 24 mai 2010
Statut
Membre
Dernière intervention
19 août 2012

Il ne fonctionne pas
Messages postés
265
Date d'inscription
mercredi 18 décembre 2002
Statut
Membre
Dernière intervention
27 octobre 2014

pas très cost comme code lol mai c marrant ca sert pas a grand chose mai bon ...
Messages postés
4
Date d'inscription
mercredi 9 juillet 2003
Statut
Membre
Dernière intervention
8 novembre 2003

Manque du code, car la variable loto_nombre n'influence rien donc que vous choississez belge ou suisse, vous allez avoir des n°45.
Manque de code...Ajoute des commentaires si tu veux t'y retrouver.
Plus le petit patch il manque : Image1.Picture = LoadPicture(App.Path & "--->/<---loto_Swiss.jpg").

Continue comme ça.. J'ai un projet aussi en parlant de Loto... LotNet (un lotto online mais en prog vb qui récupèrera les tirages,scores sur un server ect...plus gains de cadeaux...donc ---->overnetfire@hotmail.com
Messages postés
615
Date d'inscription
mercredi 18 décembre 2002
Statut
Membre
Dernière intervention
4 juillet 2012

Bien vu Clément il y a effectivement un blème, en fait j'avais oublié
de modifié la close case comme ci-dessous, le lotto Swiss est sur 6 chiffres et 45 numéros, il suffit d'ajouter ce petit patch et tout rentre dans l'ordre.

Case 2
loto_Numero = 45
loto_Nombre = 5
Label2.Caption = "6 chiffres 45 numéros soit 8'145.060 posibilités"
Image1.Picture = LoadPicture(App.Path & "loto_Swiss.jpg")
End Select

Pour ce qui est des commentaires oui c'est vrai ça manque mais le code est toutefois assez simple.

Bonne prog.
Messages postés
406
Date d'inscription
lundi 2 décembre 2002
Statut
Membre
Dernière intervention
25 janvier 2014

salut a toi , tu devrez commenter ton code .autrement pas mal .
un truc que je pige pas : loto belge et suisse 42 n° .
le prog tire le n° 43 ya pas un probleme !
Afficher les 8 commentaires

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.