Um eine zeitgesteuerte Spiel in Visual Basic zu machen, erstellen Sie ein einfaches Quiz, das einen "Timer "-Steuerung setzt nach jeder Frage gestellt wird . Sagen Sie der Spieler sie nicht die Herausforderung, wenn der Timer abgelaufen ist gerecht . Sie können dieses Projekts Programmierung Aussagen , um eine Vielzahl von Tests , einschließlich Tests für Mathematik, Geschichte oder Geographie zu erstellen. Anleitung
1
Klicken Sie auf das Menü "Datei" . Wählen Sie "Neu " und anschließend auf den "Windows Form" Element aus der Liste , die erscheint. Dies bedeutet, dass Sie wollen , um eine neue Anwendung, die ein Formular für die Dateneingabe verwendet zu machen.
2
Ziehen Sie die "Button" -Steuerelement aus der Werkzeuge-Palette auf das Formular. Dieser Button wird damit der Benutzer das Spiel beginnen . Ziehen Sie eine weitere Schaltfläche auf das Formular , um den Benutzer mit einem Mittel , um eine Antwort vorzulegen gedenkt .
3
Platz ein "Text Box" Steuerelement auf das Formular , um dem Benutzer ein Eingabefeld zu geben Sie die Antwort .
4
Ziehen Sie einen "Timer" -Steuerelement aus der Werkzeuge-Palette auf das Formular , und geben Sie "10000" für die Interval-Eigenschaft . Mit dieser Aktion wird der Timer läuft der Countdown auf 10 Sekunden .
5
Doppelklicken Sie auf die zweite Schaltfläche, um das Programmfenster zu gelangen. Fügen Sie die folgenden Aussagen in dem Fenster :
Public Class Form1Dim q ( 0 bis 2) Wie StringDim a ( 0 bis 2) Wie StringDim iCurQ As Integer = 1Private - Sub Button1_Click (ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles Button1.Click " starten Sie das Spiel
q (0) =" Was Nationaldenkmal zeigt vier US-Präsidenten in Stein ? "q (1) =" Wer erfand das Licht Glühbirne ? "q (2) = " von welchem Wissenschaftler hat die Relativitätstheorie gekommen? " a (0) =" Mount Rushmore " a ( 1) =" Edison " a ( 2) = " Einstein " ; gotoTeacher () End Sub Sub
gotoTeacher () = iCurQ iCurQ + 1Wenn ( iCurQ > 2) Dann EndMsgBox (q ( iCurQ ) ) = Timer1.Enabled TrueEnd Sub