Зміст

• Інструкції

У Visual Basic .NET таймер дозволяє керувати періодичними подіями під час виконання програми. Таймер має деякі унікальні властивості та методи для цього. Найбільш важливою властивістю є "Інтервал", який визначає, як часто таймер повинен запускати код. Ви надаєте значення діапазону в мілісекундах; тисяча мілісекунд дорівнює одній секунді. Деякі приклади того, що ви можете зробити з контролером, включають в себе відлік, динамічно змінюючи значення властивостей для інших елементів керування, а також постійне спостереження за деякими іншими частинами програми.

Інструкції

Значення інтервалу таймера задається в мілісекундах (зображення годинника Peter Hires Images з Fotolia.com)

1. Відкрийте проект у Visual Basic. Двічі клацніть таймер і додайте "Timer1" і двічі клацніть "Мітка", щоб додати "Label1". Змініть властивість "Enabled" на "True" і змініть діапазон на 1000.

2. Натисніть "F7", щоб відкрити вікно коду та введіть наступний код:

   Dim time As Integer = 10

   Це створює змінну і ініціалізує її.

3. Відкрийте аплет Timer1_Tick і введіть наступний код:

   Якщо час> 0, то час = час - 1 Label1.Text = час Else Timer1.Enabled = False End If

   Коли програма запускається, таймер зменшує змінну кожну секунду, показуючи значення на рамці, поки кількість не досягне нуля, що призведе до вимкнення таймера.

   
   

4. Натисніть "Shift" і "F7", щоб відкрити вікно проекту. Двічі клацніть таймер і додайте "Timer2" до проекту. Змініть властивість "Enabled" на "True" і його діапазон до 100, потім двічі клацніть на ньому, щоб відкрити підпрограму Timer2_Tick. Потім введіть наступний код:

   If (Label1.Left + Label1.Width)> Me.Width Потім Label1.Left = Me.Left - 100 End Якщо Label1.Left = Label1.Left + 5

   Цей код змушує панель прокручуватися горизонтально по екрану, переміщаючи п'ять пікселів кожну десяту секунди. Коли намет досягає правого кінця форми, він повертається вліво і починає знову рухатися.

5. Натисніть "Shift" і "F7", щоб відкрити вікно проекту. Двічі клацніть на контролері та додайте "Timer3" до проекту. Змініть властивість "Enabled" на "True" і його діапазон до 500. Потім двічі клацніть на "TextBox", щоб додати "TextBox1". Двічі клацніть проект Timer3, щоб відкрити аплет Timer3_Tick. Потім введіть наступний код:

   
   

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

   Кожні 30 секунд таймер змінює весь текст з "TextBox1" на верхнє поле. За замовчуванням, коли таймер вносить зміни, курсор повертається до початку текстового поля. Другий рядок коду запобігає цьому.