Ako používať Timer1 na VB.NET

Čas , kritický v mnohých oblastiach života , často hrá dôležitú úlohu vo vývoji softvéru rovnako . Niektoré hry , napríklad, sa môže skladať z modulov , ktoré potrebujete vedieť presný čas až na milisekundy . Vývojári VB.NET mať prístup k užitočné . NET ovládacieho prvku s názvom " Timer " . Jednoducho pretiahnite jednu z týchto ovládacích prvkov na formulári vášho projektu , a NET mena je timer1 ak neexistujú žiadne iné časovača . Vaše aplikácie potom môžete použiť Timer1 na spustenie udalosti v pravidelných intervaloch , ktoré určíte . Pokyny dovolená 1

Spustiť Visual Studio . Kliknite na menu " Súbor " a potom kliknite na tlačidlo " Nový" sa zobrazí zoznam možností . Kliknite na možnosť " projekt " , a potom kliknite na tlačidlo " Visual Basic " .
2

Double - kliknite na " Windows Forms aplikácie . " Visual Studio vytvorí nový projekt formulárov Windows . Nový formulár sa zobrazí v návrhovom okne projektu .
3

Kliknite na menu " View " , a potom kliknite na tlačidlo " ToolBox " pre zobrazenie Visual Studio v paneli nástrojov . Vyhľadajte riadenie " Timer " v paneli nástrojov , a dvakrát kliknite na tento ovládací prvok . Ovládací prvok s názvom Timer1 objaví pod formulár v dolnej časti obrazovky .
4

Pravým - kliknite na " Timer1 , " a potom kliknite na tlačidlo " Properties " pre zobrazenie okna Vlastnosti časovača . Kliknite na tlačidlo " šípka " v tvare ikonu v hornej časti okna . Objaví sa " Tick " ikona udalosť . Dvakrát kliknite na túto ikonu . Visual Studio otvorí okno kódu a zobrazuje " Timer1_Tick " sub . Táto čiastková beží zakaždým Timer1 kliešte. Môžete určiť , ako často časovač kliešte nastavením jeho " Interval " majetok
5

vložte nasledujúci kód do pred ponorky " End Sub " vyhlásenie : .

Timer1.Stop ( )

MessageBox.Show ( " Tick udalosť spustil . Tick Counter = " & tickCounter.ToString ( ) )

Ak tickCounter < tickCounterLimit Potom

Timer1.Start ( )

tickCounter = tickCounter + 1

End If

tento kód --- , ktorý beží po Timer1 kliešťov --- zastaví časovač a otvorí sa okno so správou . Okno s hlásením zobrazí hodnotu premennej s názvom tickCounter . "Ak je " vyhlásenie po vyhlásení MessageBox.Show reštartuje časovač , ak hodnota tickCounter je menšia než lehoty nastavenej v premennej s názvom tickCounterLimit . Kód pridá 1 k premennej tickCounter
6

Presun do hornej časti okna kód a vložiť kód zobrazený na obrázku nižšie nad všetkými ostatnými príkazy v okne kódu : .

Súkromná tickCounter

Súkromná TimerInterval

Súkromná tickCounterLimit

Tieto príkazy definujú tri premenné iné ponorky používané v aplikácii .
7

Stlačením klávesu F7 . Formulár sa objaví v okne kódu. Dvakrát kliknite na formulári záhlavie v hornej časti formulára . Okno Kód otvorí a zobrazí sa " Form1_Load " sub . Tým sa spustí , keď vaše načítanie formulára
8

Vložte nasledujúci kód pred týmto ponorky " End Sub " vyhlásenie : .

TickCounter = 1

TimerInterval = 2000

tickCounterLimit = 3

Timer1.Interval = TimerInterval

Timer1.Start ( )

Prvý príkaz nastaví hodnotu premennej tickCounter na 1. Premenná TimerInterval má hodnotu " 2000 " , v tomto príklade . To je počet milisekúnd časovač bude čakať pred spustením " Timer1_Tick " sub . Premenná tickCounterLimit nastaví limit na to , koľkokrát kód bude volať " Timer1_Tick " sub . Metóda Timer1.Start spustí časovač .
9

Stlačte " F5 " . spustenie projektu . Objaví sa formulár , a časovač začne tikať . Po roku 2000 milisekúnd uplynie , kód vnútri čiastkových beží Timer1_Tick . Tento kód sa zobrazí okno so správou , ktorá zobrazuje hodnotu premennej tickCounter . Táto hodnota je 1.
10

Stlačte tlačidlo " Enter " pre zatvorenie okna so správou . Kód pokračuje v realizácii , zvýši sa kliešť Counter premenné o 1 a reštartuje časovač . 2000 milisekúnd neskôr , box správa zobrazí znovu a zobrazí hodnotu premennej tickCounter , že teraz číta 2.
11

Stlačte tlačidlo " Enter " konečný čas . Okno so správou ukazuje 3 pre hodnotu premennej . Vzhľadom k tomu , nastavte hodnotu tickCounterLimit až 3 , časovač nereštartuje .

• Predchádzajúca strana: Ako zahrnúť JavaScript Medzi Vb.NET 
• Ďalšia strana: Ako si vyrobiť tlačidla pre VBScript