80s toys - Atari. I still have
HomeMy siteDownload KomentarPasang Iklan
Pasang Iklan anda disini

Menghitung Selisih Tanggal

Bila Anda membutuhkan kode untuk menghitung selisih antar 2 data Tanggal baik secara hari, bulan, atau tahun, berikut contohnya :

Fungsi : DateDiff( Jenis Interval, Tanggal Pertama, Tanggal Kedua )


Jenis IntervalKeterangan
dDay (Hari)
mMonth (Bulan)
yyyyYear (Tahun)
hHour (Jam)
nMinute (Menit)
sSecond (Detik)
wwWeek (Minggu)
qQuater (4 Bulan)


Misalnya Anda ingin menghitung selisih hari antara tanggal 15 Jan 2012 (ditulis #1/15/2012#) dan 20 Jan 2012, yang berarti akan menggunakan jenis interval "d".
t = DateDiff("d", #1/15/2012#, #1/20/2012#) , hasilnya 5

Jika Tanggal didapat dari kontrol semisal DateTimePicker, maka kodenya :
t = DateDiff("d", DateTimePicker1.Value, DateTimePicker2.Value)