Jeu des 5 balles! vive le québec!

Soyez le premier à donner votre avis sur cette source.

Vue 3 350 fois - Téléchargée 315 fois

Description

Désolé, on est toujours fier d'où'sé qu'on vient!
C'est un petit jeu amusant que j'ai programmé en 2 heures. Le but: Aligner 5 balles de la même couleur en une ligne horizontale ou verticale. Mais attention, chaque fois que vous bougez une balle, trois autres aparaissent. Lorsque vous réussissez, les 5 balles alignées disparaissent. 3 modes de difficultés. On peut s'amuser pendant des heures...

Conclusion :


Si vous voulez que les sons fonctionnent y faut copier les trois fichiers Waves dans votre c:\ Ou bien modifier le path dans le code.

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

lucpaul
Messages postés
4
Date d'inscription
jeudi 12 juin 2003
Statut
Membre
Dernière intervention
19 avril 2005

Le jeu est bien fait! Bravo pour ta structure, enfin quelqu'un qui a de belles normes...

vive le Québec libre!!!
BruNews
Messages postés
21042
Date d'inscription
jeudi 23 janvier 2003
Statut
Modérateur
Dernière intervention
21 août 2019
18
On preconise de ne pas mettre d'exe alors il est inutile d'en reclamer.
Les gens qui viennent sur vbfrance sont senses avoir Visaul Basic pour compiler, 1 minute maxi pour dezipper et compiler.
lulusurf
Messages postés
13
Date d'inscription
lundi 17 novembre 2003
Statut
Membre
Dernière intervention
8 septembre 2005

et un exe... ?? stp??
zemetafyzik
Messages postés
117
Date d'inscription
jeudi 17 juin 2004
Statut
Membre
Dernière intervention
3 novembre 2007
1
petit rajout:

avec cette methode, le compteur n'est pas comme dans la capture du prog...
zemetafyzik
Messages postés
117
Date d'inscription
jeudi 17 juin 2004
Statut
Membre
Dernière intervention
3 novembre 2007
1
je ne sais pas si sa peu t'aider, mais deja, il faut rajouter un "usercontrol" (là ou on rajoute des form dans un programme) , choisir celui qui est dans le dosier des 5 balles

ensuite, chez moi ce qui bug, c'est le
"compteur1.value"

alors jai mis un "compteur1.print(result)

donc sa me donne ça :

Private Sub ChangerCompteur(Pts As Long)
Dim result As Long
result = Pts
Compteur1.Cls
Compteur1.Print (result)
End Sub


et dans la sub "depart" je la supprimé.

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.