Wie man einen elektronischen Countdowntimer

Eine elektronische Countdown-Zähler können auf Ihrem Desktop eine bequeme Möglichkeit zu verfolgen große Ereignisse sein. Ob Sie möchten wissen, wie lange es dauert bis das Wochenende oder Ihren Hochzeitstag, ist ein Countdown-Zähler Ihre ständige Erinnerung. Sie können eine elektronische Countdown-Zähler verwenden einfache Programmiersoftware vornehmen. Und mit nur ein wenig Geduld, werde Sie unten die Tage, Stunden, Minuten und Sekunden zählen werden.

Anweisungen

1 Starten Sie Ihre Kopie von Visual Basic, und erstellen ein neues Dokument. Klicken Sie auf "New Project..." im Menü auf der linken Seite des Bildschirms gefunden. Wählen Sie "Windows Forms-Anwendung", und klicken Sie auf "OK", um die Reihe enden.

2 Doppelklicken Sie auf "Button" aus dem Fenster "Toolbox". Dadurch wird einen neuen Button (Button1) in Ihrem Projektfenster eingefügt. Passen Sie mit der Maus seine Position und Platzierung bei Bedarf an.

3 Doppelklicken Sie auf "Timer" aus der "Toolbox". Dadurch wird Ihre Timer-Steuerelement auf den Arbeitsbereich eingefügt. Passen Sie die Platzierung, wenn nötig.

4 Doppelklicken Sie auf das Tool "Label", aus dem Fenster "Toolbox". Dadurch wird ein Anzeigefenster eingefügt, die von Ihren Timer verwendet werden. Passen Sie die Position, wenn nötig.

5 Doppelklicken Sie auf "Button1." Dieses öffnet sein "form1.vb"-Modul. Suchen Sie und wählen Sie das Eingabefeld für "Button1_Click." Sie werden die Codierung zur Steuerung des Timers Interval und Countdown eingeben. Legen Sie es auf ein-Sekunden-Intervallen aus der Basis Zeit von 15 Minuten. Geben Sie den folgenden Code:

Timer1.Interval = 1000

Timer1.Start()

CntDown = Date.Now.AddMinutes(15)

6 Klicken Sie auf die Registerkarte mit dem Namen "Form1vb [Entwurf]" im unteren Bereich des Fensters "Timer" Steuerelement gefunden. Wählen Sie unter "Timer1_Tick," das Eingabefeld. Fügen Sie den Code, der wird prüfen, ob der Countdown beendet ist und zeigt, wie lange es in der Countdown-Anzeige verlassen hat, den Sie in Schritt 4 hinzugefügt. Geben Sie den folgenden Code:

Wenn CntDown < Date.Now dahin

Me.Timer1.Stop()

MessageBox.Show ("Countdown ist abgeschlossen!")

Sonst

Dim TimeRem As TimeSpan = Me.cntDown.Subtract(Date.Now)

Me.Label1.Text = String.Format ("{0}: {1:d2}: {2:d2}", _

timeRem.Hours _

timeRem.Minutes _

timeRem.Seconds)

EndIf

7 Zurück zum Hauptprojekt Fenster zurückzukehren Sie, und speichern Sie die Datei. Klicken Sie auf die Taste F5 auf Ihrer Tastatur, um den Code zu aktivieren gefunden. Verwenden Sie Ihre Maus klicken Sie auf "Button1", um den Countdown zu starten.