Sadržaj

• smjerovi

U Visual Basicu .NET, timer vam omogućuje kontrolu periodičnih događaja tijekom vremena izvođenja vaše aplikacije. Tajmer ima neka jedinstvena svojstva i metode za to. Najvažnija osobina je "Interval", koji određuje koliko često bi tajmer trebao pokrenuti kôd. Navedite vrijednost raspona u milisekundama; tisuću milisekundi jednako je jednoj sekundi. Neki primjeri onoga što možete učiniti s kontrolorom uključuju pokretanje odbrojavanja, dinamičko mijenjanje vrijednosti svojstava za druge kontrole i stalno praćenje nekih drugih dijelova aplikacije.

smjerovi

Vrijednost vremenskog intervala dana je u milisekundama (slika sata po Peteru Hiresu Slike iz Fotolia.com)

1. Otvorite projekt u Visual Basicu. Dvaput kliknite timer i dodajte "Timer1" i dvaput kliknite "Label" da biste dodali "Label1". Promijenite svojstvo kontrole "Omogućeno" na "True" i promijenite raspon na 1000.

2. Pritisnite "F7" da biste otvorili prozor koda i unesite sljedeći kôd:

   Dim time As Integer = 10

   To stvara varijablu i inicijalizira je.

3. Otvorite aplet Timer1_Tick i unesite sljedeći kôd:

   Ako vrijeme> 0 Tada vrijeme = vrijeme - 1 Label1.Text = vrijeme Else Timer1.Enabled = False End If

   Kada se program pokrene, tajmer će smanjiti varijablu svake sekunde prikazujući vrijednost na oznaci sve dok broj ne dostigne nulu, uzrokujući da se tajmer isključi.

   
   

4. Pritisnite "Shift" i "F7" za otvaranje prozora projekta. Dvaput kliknite timer i dodajte "Timer2" u projekt. Promijenite svojstvo "Omogućeno" na "True" i njegov raspon na 100, a zatim dvaput kliknite na njega da biste otvorili pod-program Timer2_Tick. Zatim unesite sljedeći kôd:

   Ako (Label1.Left + Label1.Width)> Me.Width Potom Label1.Left = Me.Left - 100 End Ako Label1.Left = Label1.Left + 5

   Ovaj kod uzrokuje da se ploča horizontalno pomiče po zaslonu, pomičući pet piksela svake desetine sekunde. Kada nadstrešnica dođe do desnog kraja obrasca, vraća se na lijevo i počinje se ponovno kretati.

5. Pritisnite "Shift" i "F7" za otvaranje prozora projekta. Dvaput pritisnite kontroler i dodajte "Timer3" projektu. Promijenite svojstvo "Omogućeno" na "True" i njegov raspon na 500. Zatim dvaput kliknite na "TextBox" da biste dodali "TextBox1". Dvaput kliknite na Timer3 projekt da biste otvorili aplet Timer3_Tick. Zatim unesite sljedeći kôd:

   
   

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

   Svakih 30 sekundi, mjerač vremena mijenja sav tekst iz "TextBox1" u gornji okvir. Prema zadanim postavkama, kada mjerač vremena napravi promjene, pokazivač se vraća na početak okvira za tekst. Drugi redak koda sprječava da se to dogodi.