Birazdan yeni web sitemize yönlendirileceksiniz...!!
 ----
Eğer yönlendirilmezseniz "Yeni web sitemize gitmek için buraya tıklayın..."


Visual Basic Dersleri

Saat

Saat.

Merhaba arkadaşlar
saat yapmak için aşağıdaki gibi bir form oluşturuyoruz formumuzda 3 tane label 3 tane textbox ve bir tane Timer ekliyoruz formumuzun görüntüsü aşağıdaki gibidir ve formun altındaki kodları yazıyoruz

 

saat-form-goruntusu

Form1 load ‘ine aşağıdaki kodlar yazıyoruz

Public Class Form1
Dim saat, dakika, saniye As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Timer1.Enabled = True
Timer1.Interval = 1000
End Sub

Timer1_tick nede aşağıdaki kodları yazıyoruz

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
saniye = saniye + 1
TextBox1.Text = saat
TextBox2.Text = dakika
TextBox3.Text = saniye
If saniye = 59 Then
dakika = dakika + 1
saniye = 0
End If

End Sub
End Class

Üst teki kodları yazdıktan sonra  tıklıyarak çalıştırıyoruz ve saat çalışmaya başlıyor çalışır haldeki görüntüsü ise aşağıdaki gibidir.

saatin-calismis-hali

Bugün 28 ziyaretçikişi burdaydı!
Bu web sitesi ücretsiz olarak Bedava-Sitem.com ile oluşturulmuştur. Siz de kendi web sitenizi kurmak ister misiniz?
Ücretsiz kaydol