Å ha en elektronisk nedtelling på skrivebordet ditt kan være en praktisk måte å holde styr på store arrangementer . Enten du ønsker å vite hvor lenge det er til helgen eller til bryllupet ditt dagen , er en nedtelling din konstant påminnelse . Du kan lage en elektronisk nedtelling med enkel programmering programvare. Og med bare litt tålmodighet , vil du bli teller ned dager, timer, minutter og sekunder . Du trenger
Visual Basic
Vis flere instruksjoner
en
Start kopi av Visual Basic og lage et nytt dokument . Klikk "New Project ... " på menyen finnes til venstre på skjermen . Velg " Windows Forms Application " og klikk " OK " for å avslutte satt opp.
2
Dobbeltklikk på " Button" fra " Toolbox "-vinduet . Dette vil sette inn en ny knapp ( Button1 ) inn i prosjektet vinduet. Med musen , justere sin posisjon og plassering hvis nødvendig.
3
Dobbeltklikk på "Timer " fra " Toolbox ". Dette vil sette inn tidsstyring til arbeidsområdet . Juster plasseringen hvis nødvendig.
4
Dobbeltklikk på "Label "-verktøyet fra " Toolbox "-vinduet . Dette vil sette inn et utstillingsvindu som vil bli brukt av timeren din . Juster posisjonen hvis nødvendig.
5
Dobbeltklikk på " Button1 . " Dette vil åpne sin " form1.vb " modulen. Finne og velge feltet for " button1_click . " Du vil legge inn koding for å kontrollere timeren er intervallet og nedtelling . Sett det til ett - sekunds intervaller fra basen på 15 minutter . Skriv ut følgende kode :
Timer1.Interval = 1000
Timer1.Start ( )
cntDown = Date.Now.AddMinutes ( 15 )
6
Klikk på fanen som heter " Form1vb [Design ] " funnet nær bunnen av vinduet for " Timer" kontroll. Under " Timer1_Tick , " velge feltet . Legg inn koden som vil sjekke om nedtellingen er ferdig og vise hvor lenge den har igjen i nedtellingen skjerm du har lagt i trinn 4 . Skriv inn følgende kode :
p Hvis cntDown < Date.Now Deretter
Me.Timer1.Stop ( )
MessageBox.Show ( " ! Countdown har fullført ")
Else
Dim timeRem Som TimeSpan = Me.cntDown.Subtract ( Date.Now )
Me.Label1.Text = String.Format ( "{ 0 }: { 1 : d2 }: { 2 : d2 } ", _
timeRem.Hours , _
timeRem.Minutes , _
timeRem.Seconds )
End If
7
Gå tilbake til hovedprosjektvinduet og lagre filen . Klikk på F5-tasten finnes på tastaturet for å aktivere koden . Bruk musen til å klikke på " Button1 " for å starte nedtellingen .