Vsebina

• Navodila

V Visual Basic .NET-u timer omogoča nadzor periodičnih dogodkov med izvajanjem aplikacije. Časovnik ima nekaj edinstvenih lastnosti in metod za to. Najpomembnejša lastnost je "Interval", ki določa, kako pogosto naj timer izvaja kodo. Vrednost razpona podate v milisekundah; tisoč milisekund enaka eni sekundi. Nekateri primeri tega, kar lahko naredite s krmilnikom, vključujejo izvajanje odštevanja, dinamično spreminjanje vrednosti lastnosti za druge kontrole in za stalno opazovanje nekaterih drugih delov aplikacije.

Navodila

Vrednost časovnega intervala je podana v milisekundah (slika s strani Petra Hiresa iz Fotolia.com)

1. Odprite projekt v Visual Basicu. Dvokliknite časovnik in dodajte "Timer1" in dvakrat kliknite "Label", da dodate "Label1". Lastnost nadzora "Omogočeno" spremenite v "True" in spremenite obseg na 1000.

2. Pritisnite "F7", da odprete okno s kodo, in vnesite naslednjo kodo:

   Dim time As Integer = 10

   To ustvari spremenljivko in jo inicializira.

3. Odprite programček Timer1_Tick in vnesite naslednjo kodo:

   Če je čas> 0, potem je čas = čas - 1 Label1.Text = čas Else Timer1.Enabled = False End If

   Ko se program zažene, bo timer vsako sekundo zmanjšal spremenljivko, tako da bo prikazal vrednost na oznaki, dokler število ne doseže ničle, zaradi česar se časovnik izklopi.

   
   

4. Pritisnite "Shift" in "F7", da odprete projektno okno. Dvokliknite merilnik časa in projektu dodajte "Timer2". Spremenite lastnost »Omogočeno« na »True« in njeno območje na 100, nato dvakrat kliknite nanjo, da odprete podprogram Timer2_Tick. Nato vnesite naslednjo kodo:

   Če (Label1.Left + Label1.Width)> Me.Width Potem Label1.Left = Me.Left - 100 End Če Label1.Left = Label1.Left + 5

   Ta koda povzroči, da se plošča pomika vodoravno po zaslonu in se premika pet pik na desetino sekunde. Ko je oznaka dosegla desni konec obrazca, se vrne na levo in se začne ponovno premikati.

5. Pritisnite "Shift" in "F7", da odprete projektno okno. Dvokliknite krmilnik in projektu dodajte "Timer3". Spremenite lastnost »Omogočeno« na »True« in njeno območje na 500. Nato dvokliknite »TextBox«, da dodate »TextBox1«. Dvokliknite projekt Timer3, da odprete programček Timer3_Tick. Nato vnesite naslednjo kodo:

   
   

   TextBox1.Text = TextBox1.Text.ToUpper TextBox1.Select (TextBox1.TextLength, 0)

   Vsakih 30 sekund časovnik spremeni celotno besedilo iz "TextBox1" v zgornje polje. Po privzetku, ko časovnik izvede spremembe, se kazalec vrne na začetek polja z besedilom. Druga vrstica kode preprečuje, da bi se to zgodilo.