Jeu de mémoire classique

Soyez le premier à donner votre avis sur cette source.

Vue 6 739 fois - Téléchargée 875 fois

Description

C'est un jeu de mémoire ou il faut se souvenir de ce qui se cache derrière les cases.
Un Timer est utilisé pour effacer les cases après 1/2 seconde.

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
67
sur que les Goto ici n'aident en rien... boucles, tests, etc feront l'affaire.

il ne faut pourtant pas les bannir systématiquement (dans d'autres sources, j'entend)
Messages postés
14757
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
14 janvier 2021
151
Bonsoir,

HORREUR, des GOTO !!!!!!!!!!!

u:
h = Rnd() * 5 + 1
h2 = Rnd() * 5 + 1 If grille(h, h2) "" Then grille(h, h2) "J" Else GoTo u

Se remplace aisément par :
do
h = Rnd() * 5 + 1
h2 = Rnd() * 5 + 1
loop while grille(h, h2) = ""
grille(h, h2) = "J"

Sinon, Utilises l'objet Random plutot que les fonctions, et même :
Actives Option Explicit et Option Strict et retires l'import de l'espace de nom "Microsoft.VisualBasic" et reviens avec un code plus propre.

En l'état, ta source est un mauvais exemple pour débuter en VB.NET (et même en VB tout court à cause des GOTO).
Messages postés
3258
Date d'inscription
jeudi 26 novembre 2009
Statut
Membre
Dernière intervention
3 décembre 2019
50
Salut
la couleur jaune ne convient pas choisi une couleur plus
douce

tous les Else GoTo (je voulais mettre le smiley pirate)
quand on arrive à trouver toutes les cartes sympa d'afficher un message

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.