Menghitung selisih antara dua tanggal dengan VB 6.0

Pada pertemuan kali ini saya akan berbagi mengenai cara Menghitung selisih antara dua tanggal dengan VB 6. Untk mennghitung selisih antara dua tanggal fungsi yang akan kita gunakan adalah fungsi Datediff.

Ok, tanpa menunggu berlama-lama, buatlah form seperti gambar berikut:

Secara default, pada saat pembuatan form baru, component DTpicker belum terdapat pada daftar component. Untuk menampilkannya ikuti langkah berikut:

1. Klik menu Project
2. Pilih Components, maka akan ditampilkan form pilihan components
3. Pilih tab menu yaitu, controls, designers dan Insertable Objects.
4. Pilihkah tab controls
5. Cari daftar component “Microsoft Windows Common Controls-2.6.0 (SP6). Seperti gambar berikut: 
6. Klik OK maka beberapa component akan ditambahkan pada Toolbox.

Baiklah setelah selesai mendesain form seperti gambar diatas kita akan berlanjut pada penulisan listing perintahnya. Double klik tombol Hitung kemudian tulis listing program seperti gambar berikut.

 

 Setelah selesai, coba jalankan form tersebut dan ubah salah satu tanggal kemudian klik tombol hitung. Maka akan terlehat seperti gambar berikut:

Nah mudah bukan. Demikianlah cara menghitung selisih antara dua tanggal dengan bantuan component DTpicker dan fungsi DateDiff. Sampai ketemu pada materi berikutnya.