VB.NET'de Zamanlayıcı kontrolü nasıl programlanır

Visual Basic .NET Timer denetimi ile yinelenen olayları denetleyebilirsiniz.

1. Adım

Bir Visual Basic projesi açın. Timer1'i projeye eklemek için "Zamanlayıcı" kontrolünü çift tıklayın. Label1'i forma eklemek için "Etiket" kontrolünü çift tıklayın. Timer1 denetiminin "Enabled" özelliğini "True" (true) ve "Interval" özelliğini (aralık) olarak 1000 olarak değiştirir.

2. Adım

Kod penceresini açmak için "F7" tuşuna basın ve aşağıdakileri yazın:

Tamsayı olarak Dim zamanı = 10

Bu bir değişken oluşturacak ve bir değerle başlatacaktır.

3. adım

Timer1_Tick alt yordamını açın ve aşağıdaki kodu girin:

Eğer zaman> 0 ise zaman = zaman - 1 Label1.Text = zaman Else Timer1.Enabled = False End Eğer

Program yürütüldüğünde, Zamanlayıcı zaman değişkenini saniyede birer birer azaltacak ve sayım 0'a ulaşana kadar etiket üzerindeki değeri gösterecektir. Bu süre içinde Zamanlayıcı devre dışı bırakılacaktır.

4. Adım

Tasarım penceresini açmak için "Shift" ve "F7" tuşlarına basın. Projeye Timer2 eklemek için Timer kontrolüne çift tıklayın. Özelliği "Etkin" ve "Gerçek" ile "Aralık" özelliğinden 100'e değiştirin. Ardından, Timer2_Tick alt yordamını açmak için çift tıklayın. Aşağıdaki kodu yazın:

If (Label1.Left + Label1.Width)> Me.Width Sonra Label1.Left = Me.Left - 100 End Label1.Left = Label1.Left + 5 ise

Bu kodla etiket, ekran boyunca yatay olarak hareket eder ve saniyenin her birinin onda birini beş piksel hareket ettirir. Etiket formun sağ ucuna ulaştığında sol uca geri atlar ve tekrar yatay olarak kaymaya başlar.

Adım 5

Tasarım penceresini açmak için "Shift" ve "F7" tuşlarına basın. Timer3'ü projeye eklemek için Timer'a çift tıklayın. "Enabled" özelliğini "True" ve "Interval" özelliğini 500 olarak değiştirin. TextBox1'i projeye eklemek için "TextBox" denetimine (metin kutusu) çift tıklayın. Timer3_Tick altprogramını açmak için projenin Timer3'ü çift tıklayın. Aşağıdaki kodu yazın:

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

Her yarım saniyede, Zamanlayıcı, TextBox1'deki tüm metni büyük harflere değiştirir. Varsayılan olarak, Zamanlayıcı bu değişikliği yaptığında, imleç metin kutusunun başına döner. İkinci kod satırı, bunun olmasını engeller.