25 July 2014

VB: Timer Control

Timer control berfungsi mengirimkan detakan periodik pada aplikasi sehingga saat event timer mengirimkan detakannya kita dalam menuliskan code yang kita perlukan.

Timer control bekerja dibelakang layar, jadi saat runtime tidak akan terlihat pada tampilan aplikasi.
Property Timer:

PropertyKeterangan
(Name)Nama control yang akan mewakili sebagai identitas dalam code program
EnabledTrue maka timer mengirimkan detak, sementara false event timer tidak aktif.
IndexUrutan jika akan dibuat control array.
IntervalInterval waktu untuk mengirimkan detak.
LeftJarak timer disimpan dari sisi kiri.
TagNilai string yang bisa disimpan dalam control Timer.
TopJarak timer disimpan dari sisi atas.

Timer hanya memiliki satu Event yaitu Timer yaitu mengirimkan detak periodik pada interval tertentu.

Timer tidak memiliki Method

Contoh penggunaan Timer:


Private Sub Form_Load()
 tmrTime.Interval = 1000
 tmrTime.Enabled = True

 cmdStop.Enabled = False
End Sub

Private Sub cmdStart_Click()
 tmrStopWatch.Interval = 1000
 tmrStopWatch.Enabled = True
 cmdStop.Enabled = True
 cmdStart.Enabled = False
End Sub

Private Sub cmdStop_Click()
 tmrStopWatch.Enabled = False
 cmdStop.Enabled = False
 cmdStart.Enabled = True
End Sub

Private Sub cmdReset_Click()
 lblStopWatch.Caption = 0
End Sub

Private Sub tmrStopWatch_Timer()
 lblStopWatch.Caption = lblStopWatch.Caption + 1
End Sub

Private Sub tmrTime_Timer()
 lblTime.Caption = Now()
End Sub



Click here if you like this article.


0 comments: