Belajar Cara Menghitung Selisih Tanggal Pada VB .NET - Hallo sahabat Emboh Gakro, Pada Artikel yang anda baca kali ini dengan judul Belajar Cara Menghitung Selisih Tanggal Pada VB .NET, kami telah mempersiapkan artikel ini dengan baik untuk anda baca dan ambil informasi didalamnya. mudah-mudahan isi postingan Artikel Tutorial VB .Net, yang kami tulis ini dapat anda pahami. baiklah, selamat membaca.

Judul : Belajar Cara Menghitung Selisih Tanggal Pada VB .NET
link : Belajar Cara Menghitung Selisih Tanggal Pada VB .NET

Belajar Cara Menghitung Selisih Tanggal Pada VB .NET

Cara Menghitung Selisih Data Tanggal, Selisih Bulan, Selisih Tahun ( Penambahan, Pengurangan ) Pada Visual Basic .NET
Pada pembajaran VB .NET kali ini saya akan membahas mengenai cara menghitung selisih data tanggal pada VB .NET. Fungsi tutorial kali ini sangat banyak sekali. Yang pasti akan memberikan manfaat jika aplikasi yang anda buat menggunakan Tanggal dan akan dikurangi atau ditambah seperti aplikasi dibawah ini :

1. Pada Aplikasi Penyewaan akan sangat bermanfaat dalam menghitung biaya Sewa maupun biasa Denda
2. Pada Aplikasi Perpustakaan juga pasti menggunakan penghitungan biaya lama sewa dan denda jika pengembalian telat.
3. Dan masih banyak sekali aplikasi yang bisa diterapkan pada tutorial selisih tanggal ini.

Baik langsung saja, berikut ini kita akan langsung mempraktikan bagaimana cara membuat penghitungan selisih tanggal pada VB .NET.
Silahkan buka komputer anda
Silahkan buka Visual Basic .NET
Jika sudah muncul Form1, buatlah design Form seperti gambar dibawah ini :

Pada gambar diatas terdapat :
DateTimePicker1, LBL1, LBL2, LB3, LBL4, LBL5, LBL6, LBL7, LBL8, LBL9, Button1
Dan yang terakhir adalh Masukan Timer1.
Kemudian pada Timer1 jangan lupa anda ubah menjadi Enable.

Jika sudah semua membuat design Form1 seperti gambar diatas, masukan koding dibawah ini :

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        LBL1.Text = Format(Today(), "dd-MMMM-yyyy")
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        LBL2.Text = DateDiff(DateInterval.Day, DateTimePicker1.Value, Today()) & " Hari"
        LBL3.Text = DateDiff(DateInterval.Month, DateTimePicker1.Value, Today()) & " Bulan"
        LBL4.Text = DateDiff(DateInterval.Year, DateTimePicker1.Value, Today()) & " Tahun"
        LBL5.Text = Format(DateAdd(DateInterval.Day, 1, DateTimePicker1.Value), "dd-MMMM-yyyy")
        LBL6.Text = Format(DateAdd(DateInterval.Month, 2, DateTimePicker1.Value), "dd-MMMM-yyyy")
        LBL7.Text = Format(DateAdd(DateInterval.Year, 3, DateTimePicker1.Value), "dd-MMMM-yyyy")
        LBL8.Text = DateTimePicker1.Value.ToString("dddd")
        LBL9.Text = Hasil(Year(DateTimePicker1.Text), Month(DateTimePicker1.Text))
    End Sub
    Function Hasil(ByVal MyYear As Integer, ByVal MyMonth As Integer) As Integer
        Return DateTime.DaysInMonth(MyYear, MyMonth)
    End Function
End Class

Kodingnya sangat Simple atau sederhana namun hasilnya luar biasa :)

Kemudian yang terakhir silahkan Running atau jalankan Project VB .NET anda.
Bagaimana cara menggunakannya ?
Silahkan running Form1 VB .NET anda, kemudian anda ganti Tanggal di Pilih.
Jika sudah anda bisa Klik Button1 atau Tombol Proses.
Hasilnya adalah sebagai berikut :

 Demikian Cara Membuat Form Sederhana untuk menghitung selisih tanggal pada Visual Basic .NET. Semoga bermanfaat untuk anda.
Silahkan KLIK DISINI untuk download Project diatas

Demikianlah Artikel Belajar Cara Menghitung Selisih Tanggal Pada VB .NET

Sekianlah artikel Belajar Cara Menghitung Selisih Tanggal Pada VB .NET kali ini, mudah-mudahan bisa memberi manfaat untuk anda semua. baiklah, sampai jumpa di postingan artikel lainnya.

Anda sekarang membaca artikel Belajar Cara Menghitung Selisih Tanggal Pada VB .NET dengan alamat link https://menjadiembohgakro.blogspot.com/2017/06/belajar-cara-menghitung-selisih-tanggal.html

Tweet