| Hjem | Hardware | Netværk | Programmering | software | Fejlfinding | systemer | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringssprog
  • Delphi programmering
  • Java programmering
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl programmering
  • Python Programming
  • Ruby Programming
  • Visual Basics Programmering
  •  
    Computer Viden >> Programmering >> Visual Basics Programmering >> Content
    Hvordan man opbygger en elektronisk Nedtællingsur
    have viden til at opbygge en elektronisk nedtælling hjælp af kode i Windows kan spare dig tid. En elektronisk timer kan bygges ved hjælp af Microsoft Visual Basic.NET ( VB.NET ) - et objekt -orienteret computer programmering sprog . En elektronisk timer kan anvendes i en Windows applikation til at tælle ned og udføre andre processer, når timeren stopper med at tælle. I et par trin, vil du oprette et nedtællingsur ved hjælp af en timer kontrol og en etiket til at vise tiden. Ting du skal
    Microsoft Visual Basic Express
    Vis Flere Instruktioner
    1

    Start Microsoft Visual Basic Express og klik på " Nyt projekt ... " på den venstre rude på skærmen. Vælg "Windows Forms Application ". Klik på "OK".
    2

    Dobbeltklik på " Button " på " Toolbox" ruden for at tilføje en ny knap kontrol. Dobbeltklik på " Timer" for at tilføje en timer. Timeren vil blive brugt til at tælle ned.
    3

    Dobbeltklik på " Label" for at tilføje en etiket. Mærket vil blive brugt til at vise den tid , som det er faldende. Dobbeltklik på " Button1 " for at åbne " Form1.vb "-modulet .
    4

    Skriv følgende under " Button1_Click " for at indstille timeren intervallet til 1 sekund , starter timeren og begynder at tælle ned fra 15 minutter fra nu.

    Timer1.Interval = 1000

    Timer1.Start ()

    cntDown = Date.Now.AddMinutes (15)
    5

    Klik på " Form1.vb [ Design ] " fanen og doube på " Timer" kontrol i bunden af ​​skærmen.
    6

    Skriv følgende under " Timer1_Tick " for at kontrollere hvis nedtællingen er afsluttet. Hvis det ikke har , derefter fortsætte få forskellen mellem den aktuelle tid og " cntDown " variabel. Vise forskellen gennem Label kontrol.
    P Hvis cntDown < Date.Now Så

    Me.Timer1.Stop ()

    MessageBox.Show ( " Countdown har afsluttet ! " )

    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

    Tryk på " F5" for at udføre programmet , og klik derefter på " Button1 " for at starte nedtællingen.

    Forrige :

    næste :
      Relaterede artikler
    ·Hvordan at sætte et link i Visual Basic 2008 
    ·Sådan bruges en Web Service til at vise data om Visual…
    ·Sådan bruges DirectX i VB 
    ·Hvordan skriver jeg Updategrams XML Script i VB6 
    ·Sådan Udskift en karakter i en String i VB6 
    ·Sådan Slet ODBC DSN på vbnet 
    ·Visual Basic Tutorial --- Hvordan man skriver Koder 
    ·Sådan bruges Visual Basic Toolbar 
    ·Sådan Udskift Streger i Visual Basic 
    ·Sådan Opret din egen Installer 
      Anbefalede Artikler
    ·Sådan ændres INT til et objekt i C + + 
    ·Sådan Parse e-mail med VBS 
    ·Is_Array Vs . Is_String i PHP 
    ·Sådan Anchor en DIV til bunden af ​​en side 
    ·Sådan fjernes alle bogstaver i PHP 
    ·Sådan Konverter numre til engelsk i Java 
    ·Hvordan kan jeg bygge dynamiske web sites benytter PHP …
    ·Hjælp til Batch Programmering 
    ·Attributter Standardværdi Rails 
    ·Sådan Set Up Project Directories i Python 
    Copyright © Computer Viden http://www.computerdk.com