Membuat Perhitungan Diskon di VB.NET 2010

Kalau kalian belanja pasti kalian ingin mendapatkan diskon bukan gitu ? hehehehe. Saya juga begitu ko selalu cari yang diskonan, sebelum itu pasti kalian ingin mendapatkan diskon yang besar untuk membeli barangnya menjadi murah. Pasti kalian melihat dulu barangnya murah atau tidak, dan pasti dihitung juga harga total barang dengan diskonnya.

Dalam dunia pemograman membuat perhitungan diskon tidak hanya di liat dari diskonnya saja tapi dilihat juga dari harga barang dan totalnya yang sudah dihitung dengan harga barang dan diskon.
Pada kesempatan ini saya ingin membuat program perhitungan diskon. Lanjut saja untuk memulai programnya :

Baca Juga : Cara Menghitung Umur di VB.NET 2010

1.Buka Microsoft Visual Studio 2010.
2. Pilih Windows Form Application.
3. Label sebanyak 6, dan ada 1 label diubah (Name) yaitu yang di samping label Total Akhir adalah    lbltotalakhir.
    TextBox sebanyak 2 yaitu : txthargaawal dan txtdiskon.
    Button sebamyak 2 yaitu : btnhitung dan btnbersih.
    Warna berada di properties > BackColor.



Setelah selesai maka tampilannya sebagai berikut : 

 Note : Untuk di txthargaawal dan di txtdiskon menggunakan text berisi 0, untuk lbltotalakhir
menggunakan text berisi -. Untuk yang harus berisi 0 dan - di ubah di properties > text, lalu diisi



Selanjutnya untuk di dalam form codingannya diisi dengan sebagai berikut :

  Dim harga_awal, diskon, harga_akhir, hasil As Integer

Jika sudah diisi codingan didalam formnya, langkah  selanjutnya klik btnhitung sebanyak 2x lalu isi codingannya sebagai berikut :

  harga_awal = txthargaawal.Text
        diskon = txtdiskon.Text
        harga_akhir = (diskon / 100) * harga_awal
        hasil = harga_awal - harga_akhir
        lbltotalakhir.Text = Format(hasil, "standard")
    End Sub

Baca Juga : Membuat Jam Digital di VB.NET 2010

 Lanjut klik btnbersih sebanyak 2x lalu diisi codingannya :

txthargaawal.Text = "0"
        txtdiskon.Text = "0"
        lbltotalakhir.Text = "-"
    End Sub

Note :  Setiap anda klik btn bersih maka hasilnya yang di txthargaawal dan txtdiskon, lbltotalakhir 
            akan keluar angka 0 dan -.



Untuk melihat hasil jelasnya sebagai berikut :

 Ini hasil buatan yang kita buat :

Sekian dulu Membuat Perhitungan Diskon di VB.NET 2010 semoga bermanfaat. Sekian terimakasih