Menghitung Selisih Hari Menggunakan Objek DateTimePicker pada Visual Basic .Net

Ada beberapa aplikasi yang pasti menggunakan prosedur menghitung selisih hari pada rentang waktu tertentu. Sebagai contoh pada program kredit di bank, koperasi dan lain - lain. Dan biasanya digunakan untuk menghitung jatuh tempo dari tagihan ataupun jumlah denda berdasarkan hari. Buat sebuah project menggunakan Visual Basic .Net dan simpan dengan nama HitungHari.

Desainlah Form seperti dibawah ini

Klik kanan pada Form dan ketikkan kode dibawah ini

Public Class Form1 
 
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim DateTimePicker1 As Date
    Dim DateTimePicker2 As Date
    Dim selisih As TimeSpan
 
    DateTimePicker1 = Me.DateTimePicker1.Value
    DateTimePicker2 = Me.DateTimePicker2.Value
    selisih = DateTimePicker2.Subtract(DateTimePicker1)
    Me.TextBox1.Text = selisih.Days
End Sub
End Class

Jalankan program dengan menekan tombol F5. Tentukan rentang waktu diantara 2 objek DateTimePicker lalu klik tombol Hitung.