Съдържание

• инструкции

В Visual Basic .NET таймерът ви позволява да контролирате периодични събития по време на изпълнение на вашето приложение. Таймерът има някои уникални свойства и методи за това. Най-важното свойство е "Интервал", който определя колко често таймерът трябва да изпълнява кода. Предоставяте стойност на диапазона в милисекунди; хиляда милисекунди е една секунда. Някои примери за това, което можете да направите с контролера, са включването на обратното броене, динамично променящите се стойности на свойства за други контроли и за постоянно наблюдение на някои други части на приложението.

инструкции

Стойността на интервала на таймера е дадена в милисекунди (изображение на часовник от Peter Hires Images от Fotolia.com)

1. Отворете проект в Visual Basic. Кликнете два пъти върху таймера и добавете "Timer1" и кликнете два пъти върху "Label", за да добавите "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. След това въведете следния код:

   Ако (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" в горното поле. По подразбиране, когато таймерът прави промените, курсорът се връща в началото на текстовото поле. Вторият ред на кода предотвратява това.