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 sa stavia elektronický časovač odpočítavania

Mať znalosti na vybudovanie elektronického časovača pomocou kódu v systéme Windows vám môže ušetriť čas . Elektronický časovač môže byť vytvorená pomocou Microsoft Visual Basic.NET ( VB.NET ) - objektovo orientovaný počítačový programovací jazyk . Elektronický časovač možno použiť v aplikácii Windows odpočítavať a vykonávať ďalšie procesy , kedy časovač zastaví počítanie . V niekoľkých krokoch vytvoríte odpočítavanie pomocou ovládacieho prvku Timer a Label pre zobrazenie času . Veci , ktoré budete potrebovať v Microsoft Visual Basic Express
Zobraziť ďalšie inštrukcie Cestuj 1

Spustite program Microsoft Visual Basic Express , kliknite na tlačidlo " Nový projekt ... " na ľavom paneli obrazovky . Vyberte " Windows Forms . " Kliknite na tlačidlo " OK " .
2

Double - kliknite na " tlačidlo " na " Toolbox " paneli pridať nový ovládací prvok tlačidla . Double - kliknite na tlačidlo " Timer " pridať ovládací prvok časovača . Časovač bude použitý odpočítavať .
3

Double - kliknite na " Label " pridať štítok . Štítok bude použitý pre zobrazenie času , ako je to klesajúci . Double - kliknite na " Button1 " otvorte modul " Form1.vb " .
4

Zadajte nasledujúce pod " button1_Click " nastavte interval časovača na 1 sekundu , spustí časovač a začať odpočítavať od 15 minút od tejto chvíle .

Timer1.Interval = 1000

Timer1.Start ( )

cntDown = Date.Now.AddMinutes ( 15 )
5

Kliknite na " Form1.vb [ Design ] " kartu a Douba tlačidlom " Timer " ovládanie na spodnej časti obrazovky .
6

Zadajte nasledujúce pod " Timer1_Tick " skontrolovať ak odpočítavanie dokončené . Ak nie, potom pokračujte stále rozdiel medzi aktuálnym časom a " cntDown " premenné . Prezrite rozdiel cez ovládacieho prvku Label .

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

Stlačte " F5 " spustiť program , kliknite na tlačidlo " Button1 " spustíte odpočítavanie .

Najnovšie články

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