JEU DE WUMPUS BASIC EN VB6

Signaler
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
-
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
-
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

Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
68
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)
Messages postés
17286
Date d'inscription
mercredi 2 janvier 2002
Statut
Modérateur
Dernière intervention
23 décembre 2019
68
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.