Membuat hitungan diskon pada visual basic/studio

PROGRAM Membuat diskon an harga di toko Ramayana

Rumus perhitungan Diskon:

 total bayar = jumlah barang x harga - diskon (jumlah barang x harga x diskon

Jadi mari kita membuat program dengan vb.6 sebagai berikut :

1.Buka Visual Basic 6.0

2.Open Standard.Exe

3.Kemudian tarik 3 Label,3 Textbox dan 2 Command Button.

4.Ubah Caption Label 1 menjadi Alas Segitia,Label 2 menjadi Tinggi Segitiga dan Label 3 menjadi Hasil

5.Setelah itu ketikkan coding berikut pada tombol hitung (klik dua kali pada tombol HITUNG)

 TextBox5.Text = (TextBox2.Text * TextBox3.Text) - (TextBox2.Text * TextBox3.Text * TextBox4.Text)

6).Setelah itu ketikkan coding berikut pada tombol Keluar (klik dua kali pada tombol Selesai)

 Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        If MsgBox("apa ada yang mau di beli lagi ?", MessageBoxButtons.YesNo) = MsgBoxResult.Yes Then
            Me.Close()
        Else
            MsgBox("terimakasih sudah belanja di toko dimas ")
        End If

7.)  ini dari semua codingan setelah di start atau play 

   

 

mohon maaf bila ada salah kata dari saya