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