Contoh Aplikasi Visual Basic Membuat Jam Menggunakan Control Timer
"Contoh Aplikasi Visual Basic Membuat Jam Menggunakan Control Timer di ToolBox VB 6.0, program control timer stopwatch, hitung mundur, dan tanggal"
3 min read
Control Timer Pada ToolBox untuk Membuat Jam - Apa itu Visual Basic? Pertama mengenal Visual Basic, terlebih setelah membaca-baca review tentang software untuk programmer pemula ini, saya awalnya pikir kalau aplikasi yang bisa dibuat menggunakan VB 6.0 ini hanya aplikasi sederhana. Tapi ternyata itu tidak benar. Ada banyak aplikasi keren yang bisa dibuat dengan Visual Basic. |
| Contoh Aplikasi Visual Basic Membuat Jam Menggunakan Control Timer |
Mulai dari aplikasi sederhana seperti aplikasi kalkulator Visual Basic, aplikasi penjualan barang, form mahasiswa atau perpustakaan, aplikasi database yang dihubungkan dengan Xampp, aplikasi penjualan tiket pesawat, aplikasi kredit dan masih banyak lagi aplikasi komplit lainnya yang bisa dirancang dengan Visual Basic 6.0 ini.
Cara Membuat Jam di Visual Basic Menggunakan Timer
Timer adalah salah satu control pada ToolBox yang memiliki banyak fungsi bukan hanya untuk delay waktu suatu program tapi juga banyak manfaatnya. Dalam tutorial ini, saya hanya berbagi cara membuat jam di Visual Basic.
Untuk interface dan tombol lainnya, silahkan Anda kreasikan sendiri.
Langsung saja, berikut beberapa contoh program menggunakan control timer pada Visual Basic.
- Contoh Program Timer Stopwatch Sederhana
1. Buat project EXE baru di software Visual Basic 6.0
2. Insert komponen yang ada di Toolbox berikut ini ke dalam form.
- Label (Name: Label1)
- Timer (Name: Timer1)
3. Klik 2 kali pada ikon Timer di dalam form dan copy and paste kode program berikut.
Label1.Caption = Val(Label1.Caption) + 1
4. Pada jendela properties Timer1, atur interval menjadi 1000. Dalam Visual Basic, interval 1000 sama dengan 1 detik.
5. Running program Timer yang dibuat. Program ini akan melakukan perhitungan mulai dari angka 1 (Sesuai dengan angka Caption Label1) yang akan bertambah 1 angka setiap detiknya (+1).
|
| Program Stopwatch Sederhana dengan Control Timer di VB 6.0 |
Contoh Program VB 6.0 Sederhana Untuk Membuat Jam
Komponen yang di insert masih sama seperti contoh program timer stopwatch di atas, yaitu Label dan Timer.
Pada icon Timer, berikut beberapa kode yang dapat diisi untuk membuat jam sederhana lengkap dengan tanggal yang sesuai dengan waktu di Komputer.
- Kode untuk membuat jam otomatis dan tanggal di Visual Basic.
Source code ini akan menghasilkan program aplikasi yang menampilkan waktu secara otomatisv lengkap mulai dar tanggal sampai jam, menit dan detik mengikuti waktu yang ada di komputer.
Private Sub Timer1_Timer()
Label1.Caption = Now
End Sub
- Kode untuk membuat jam otomatis dengan format jam, menit, dan detik.
Private Sub Timer1_Timer()
Label1.Caption = Format(Now, "hh:mm:ss")
End Sub
Berikut format waktu di Visual Basic yang dapat diterapkan pada Timer.
- dd Menampilkan 2 digit Tanggal
- dddd Menampilkan Hari
- mm Menampilkan 2 digit Bulan
- mmmm Menampilkan Bulan dengan Format Teks
- yyyy Menampilkan tahun 4 digit
- hh Menampilkan 2 digit jam
- mm Menampilkan 2 digit menit (digunakan setelah hh)
- ss Menampilkan 2 digit detik
Private Sub Timer1_Timer()
Label1.Caption = Format(Now, "dddd,dd mmmm yyyy hh:mm:ss ")
End Sub
Hasilnya akan seperti pada gambar berikut ini.
 |
| Contoh program Timer lengkap di Visual Basic |
- Contoh program Timer Visual Basic membuat hitung mundur.
Private Sub Timer1_Timer()
Label1.Caption = Val(Label1.Caption) - 1
End Sub
Yang perlu diubah adalah Caption Label1 yang merupakan jumlah waktu hitung mundur (Misalnya 60 detik). Kode – 1 menandakan angka di Label1 (60 detik) berkurang 1 angka setiap detiknya jika interval 1000 pada Timer.
NB: Icon Timer klik 2 kali kemudian isi dengan kode-kode di atas.
Jika ada yang kurang jelas, bisa komentar di bawah agar kita bisa selesaikan bersama.
Demikianlah Contoh Aplikasi Visual Basic Membuat Jam Menggunakan Timer ToolBox. Semoga bermanfaat.