Hoe maak je een Hangman Game in Visual Basic Build

In de klassieke raadspel van Hangman, een verborgen woord is geopenbaard één letter in een tijd als de speler raadt de brief.Als de speler raadt een letter niet in het woord, een tekening van een man op een galg komt steeds dichter bij te voltooien.Herscheppen dit spel in Microsoft Visual Basic is eenvoudig.Er zijn geen ingewikkelde regels en geen echte strategie die moet worden geprogrammeerd.Een eenvoudige gebruikersinterface en een aantal eenvoudige code zijn alles wat je nodig hebt.

wat je nodig hebt

  • Microsoft Visual Basic

instructies

  1. Start een nieuweproject in Microsoft Visual Basic en maak een nieuw Windows-formulier.Dit zal de hoofdgebruikersinterface en de enige vorm die moet worden aangemaakt.Op dit formulier plaats 26 labels of knoppen, één voor elke letter in een controle-serie gerangschikt in een mooie rooster aan de rechterkant van het formulier.Plaats een enkele foto doos controle aan de linkerkant van het formulier.Langs de bodem plaatslab

    el controles voor elke lege ruimte, voldoende voor de letters in het woord langste.De tekst van elke controle wordt een underscore karakter.Ook aan de onderkant, plaats een "Quit" knop en een "New Game" knop.Maak een ImageList controle over de vorm en laden met beelden van de verschillende stadia van de gehangene, van lege galg bij de start tot een volledig getrokken man en "Game over" aan het einde.Tenslotte maakt een globale koordvariabele dat het woord gebruikt voor het huidige spel opslaat.

  2. Maak een lijst met woorden die gebruikt zullen worden en deze opslaan in een tekstbestand in dezelfde map als het project.In de "Form_Load" event van de belangrijkste vorm, voeg code die de tekst bestand wordt geladen in een array van strings.Bij gebruik van Visual Basic 6.0, de code te lezen van de tekst bestand zou iets als dit:

    Open & lt; woord bestandsnaam en het pad & gt;Input voor als # 1
    Hoewel niet EOF (1)
    zwaard = lijningang # 1
    Wend
    Sluiten (1)

  3. Stel de gebruikersinterface voor de eerste wedstrijd.In een lus, moet u alle van de brief knoppen worden ingeschakeld.Zet alle van de lege brief etiketten te worden verborgen en zet het beeld om het beeld lege galg van de ImageList zijn.

  4. Voeg een event handler voor de "New Game" knop.In het, pak een willekeurig getal tussen 1 en het aantal elementen in het woord array, dan krijg het woord op die array positie.Vind de lengte van het woord en maken dat veel van de lege brief labels zichtbaar.Zet alle van de lege brief etiketten te worden verborgen en zet het beeld om het beeld lege galg van de ImageList zijn.Dit werd gedaan op de belasting van de vorm ook.Om op te slaan coderen, kan de 'Form_Load "event worden gedaan om de nieuwe game gewoon bellen" Klik Event ", zodat het laden van het formulier automatisch een nieuw spel.

  5. Voeg een gebeurtenis click aan de controle array voor de brief knoppen.In het geval handler voor de knop, controleer dan of het huidige spel woord bevat die letter.Als dat zo is, verandert het label voor de brief die voortvloeit uit een underscore om de geselecteerde letter.Vervolgens stelt u de eigenschap enabled van de aangeklikte knop om "valse", zodat het niet opnieuw kan worden geklikt.Dit zal ook een visuele indicatie van de brieven die zijn geprobeerd zijn.Als de geselecteerde letter is niet in het spel woord, verhogen de afbeelding in het vak afbeelding om de volgende afbeelding in de lijst.Als de volgende afbeelding is de "Game over" image, dan is het spel afgelopen en al van de brief toetsen moet worden ingesteld op uitgeschakeld.

  6. Voeg een gebeurtenis click op de "Quit" knop die net eindigt het programma (met behulp van Visual Basic "End" statement).

Resources

  • Hangmangame.net: Hangman Online
307
0
2
Visual Basics Programming