JEU DE WUMPUS BASIC EN VB6

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 30 juin 2008 à 13:32
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 30 juin 2008 à 13:39
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/47159-jeu-de-wumpus-basic-en-vb6

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
30 juin 2008 à 13:39
coté jouabilité, faudrait gérer le clavier.

coté code, c'est pas la joie... code répété encore et encore,
Variables non déclarées (ajoutes Option Explicit tout en haut de ta Form)

ce genre de choses:
a3 = Int((33 * Rnd) + 3)While (a3 a2 Or a3 a1)
a3 = Int((33 * Rnd) + 3)
Wend

s'ecrit:
Do
a3 = Int((33 * Rnd) + 3) Loop While (a3 a2 Or a3 a1)
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
30 juin 2008 à 13:34
j'ai reposté le Zip, qui contenait un rar dans lequel était la source...

c'est tout de même plus simple de ne faire qu'un Zip.
Rejoignez-nous