CONNEXION
  • RetourJeux
    • Sorties
    • Hit Parade
    • Les + populaires
    • Les + attendus
    • Soluces
    • Tous les Jeux
    • Gaming
  • RetourActu Gaming
    • News
    • Astuces
    • Tests
    • Previews
    • Toute l'actu gaming
  • RetourBons plans
    • Bons plans
    • Bons plans Smartphone
    • Bons plans Hardware
    • Bons plans Image et Son
    • Bons plans Amazon
    • Bons plans Cdiscount
    • Bons plans Decathlon
    • Bons plans Fnac
    • Tous les Bons plans
  • RetourJVTech
    • Actus High-Tech
    • Intelligence Artificielle
    • Smartphones
    • Mobilité urbaine
    • Hardware
    • Image et son
    • Tutoriels
    • Tests produits High-Tech
    • Guides d'achat High-Tech
    • JVTech
  • RetourCulture
    • Actus Culture
    • Culture
  • RetourVidéos
    • A la une
    • Gaming Live
    • Vidéos Tests
    • Vidéos Previews
    • Gameplay
    • Trailers
    • Chroniques
    • Replay Web TV
    • Toutes les vidéos
  • RetourForums
    • Hardware PC
    • PS5
    • Switch 2
    • Xbox Series
    • Switch
    • Pokemon pocket
    • FC 25 Ultimate Team
    • League of Legends
    • Tous les Forums
  • PC
  • PS5
  • Xbox Series
  • Switch 2
  • PS4
  • One
  • Switch
  • iOS
  • Android
  • MMO
  • RPG
  • FPS
En ce moment Genshin Impact Valhalla Breath of the wild Animal Crossing GTA 5 Red dead 2
Liste des sujets

Problème VBScript (bloc-note)

Azzdark
Azzdark
Niveau 36
23 décembre 2014 à 19:21:05

J'ai un petit problème, je m'amuse a faire un petit jeu de loterie en vbs avec le bloc-note. Dès que j'enregistre et que je lance le programme pour tester et ça me dit que j'ai entrer la commande (do ... loop) sans le do, pourtant je l'ai bien mis :( Je comprend pas pourquoi il me dise ça. Voila le code que j'ai raccourcis pour voir si c'est parce que do et loop sont trop éloignés mais sa ne marche toujours pas :non: :
'dim argentscore
dim choix
dim alea

argentscore = 200

msgbox("Début du test ! Let's go !!!!!!!")
do
msgbox("Appuie sur 'Ok' pour lancer la rouuuue !")

Randomize
alea = Int((2* Rnd) + 1)

If (alea = 1) then
argentscore = argentscore + 100
choix=inputbox("Bravo tu a trouvé la combinaison a 100 $ ! Pas mal, réessaye !"_
+ chr(13) _
+ "Votre argent : "& argentscore &" $.")
if (choix = "oui") then
argentscore = argentscore - 50
else
if (choix = "non") then
msgbox("D'accord, au revoir !")
Wscript.quit
If (alea = 2) then
choix=inputbox("Dommage tu a raté ! Réessaye !"_
+ chr(13) _
+ "Votre argent : "& argentscore &" $.")
loop
end if
end if
end if
end if

J'espere que vous m'aurez compris et merci d'avance pour les réponses :)

mayb3
mayb3
Niveau 8
24 décembre 2014 à 14:28:35

Le loop est mal placé, met le a la fin des end if et ça marchera mieux :)

Pseudo supprimé
Pseudo supprimé 25 décembre 2014 à 21:45:58

Tu pourrais faire un screen du code source ou l'héberger sur http://pastebin.com plutôt que d'en faire un C/C ?

Parce que là c'est dur à lire ton code sans les indentations et les couleurs
....

Merci.

Azzdark
Azzdark
Niveau 36
29 décembre 2014 à 21:30:18

Merci mayb3 pour la réponse je vais essayer.
Et Wouls je crois que tu parle du VB.net non ?

Sous forums
  • Aide à l'achat Mac
  • Création de sites web
  • Création de Jeux
  • Linux
  • Programmation
  • Internet
  • Steam Deck
  • Macintosh
  • Hardware
La vidéo du moment