Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky

Domáce Hardware Siete Programovanie Softvér Otázka Systémy

Ako si vyrobiť Electronic Countdown Timer

s elektronickou odpočítavanie na vašej pracovnej ploche môže byť pohodlný spôsob , ako sledovať veľké akcie . Či už chcete vedieť , ako dlho to je , až cez víkend , alebo kým váš svadobný deň , odpočítavanie je váš stálou pripomienkou . Môžete si vytvoriť elektronický odpočítavanie časovača pomocou jednoduchého programovacieho softvéru . A s trochou trpezlivosti , budete odpočítavať dni , hodiny , minúty a sekundy . Veci , ktoré budete potrebovať
Visual Basic
Zobraziť ďalšie inštrukcie Cestuj 1

Začnite kópiu Visual Basic a vytvoriť nový dokument . Kliknite na tlačidlo " Nový projekt ... " v ponuke našiel na ľavej strane obrazovky . Vyberte " Windows Forms " a kliknite na " OK " pre dokončenie nastavenia .
2

Double - kliknite na " Button " z okna " Toolbox " . To sa vložiť nové tlačidlo ( Button1 ) do okna projektu . S myšou , upravte jeho polohu a umiestnenie v prípade potreby.
3

Double - kliknite na " Timer " z " Toolbox " . To bude vkladať svoje časový spínač do pracovného priestoru . Upravte umiestnenie v prípade potreby.
4

Double - kliknite na " Label " nástroj z okna " Toolbox " . To sa vložiť okno displeja , ktorý bude použitý váš časovačom . V prípade potreby upravte pozíciu .
5

Double - kliknite na " Button1 . " Tým sa otvorí jeho " Form1.vb " modul . Vyhľadajte a vyberte vstupné pole pre " button1_Click . " Budete vstupné kódovanie kontrolovať interval časovača a odpočítavanie . Nastavte na jednu sekundu od základnej dobu 15 minút . Zadajte out nasledujúci kód :

Timer1.Interval = 1000

Timer1.Start ( )

cntDown = Date.Now.AddMinutes ( 15 )
6

Kliknite na záložku s názvom " Form1vb [ design ] " nachádza v tesnej blízkosti dolnej časti okna riadenia " Timer " . Pod " Timer1_Tick , " vyberte vstupné pole . Pridajte kód , ktorý bude kontrolovať , či je odpočítavanie dokončené a zobrazí , ako dlho to bolo ponechané na displeji odpočítavanie ste pridali v kroku 4. Zadajte nasledujúci kód :

Ak cntDown < Date.Now Potom

Me.Timer1.Stop ( )

MessageBox.Show ( " ! Countdown je dokončený " )

Else

Dim Timer Ako 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

Návrat späť do hlavného okna projektu a súbor uložte . Kliknite na kláves F5 našiel na klávesnici aktivovať kód . Pomocou myši kliknite na " Button1 " pre spustenie odpočítavanie .

Najnovšie články

Copyright © počítačové znalosti Všetky práva vyhradené