Timer control bekerja dibelakang layar, jadi saat runtime tidak akan terlihat pada tampilan aplikasi.
Property Timer:
Property | Keterangan |
(Name) | Nama control yang akan mewakili sebagai identitas dalam code program |
Enabled | True maka timer mengirimkan detak, sementara false event timer tidak aktif. |
Index | Urutan jika akan dibuat control array. |
Interval | Interval waktu untuk mengirimkan detak. |
Left | Jarak timer disimpan dari sisi kiri. |
Tag | Nilai string yang bisa disimpan dalam control Timer. |
Top | Jarak 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