Aplikasi Penghitung Discount - Anda pengusaha ? bingung mempromosikan dagangan anda ? pilihan terbaik adalah memberikan harga promo atau potongan harga. Jika anda memilih memberi potongan harga, maka anda akan mengalami kebingungan dalam menghitung berapa harga dagangan anda setelah di discount. Nah disini sini saya akan share, Penghitung Disount. Tinggal masukin harga, lalu diskon hitung deh, akan keluar harga setelah dikenakan potongan harga.
Oke, mari kita buat Aplikasi tersebut dengan mengikut langkah-langkah berikut ini :
1. Open Visual Basic 6.0, pilih standart exe
2. Buat form, pada form1 tambahkan komponen berikut ini :
- 3 Textbox (Name : Text1,Text2,Text3)
- 4 Label (Name : Label1,Label2,Label3,Label4)
- 1 Command Button (Name : Hitung)
3. Masukan script ini, cara nya, Klik kanan > View Code
Option Explicit
Dim harga As Long, diskon As Long, totalharga As Long, totaldiskon As Long
Private Sub Hitung_Click()
On Error Resume Next
harga = Text1.Text
diskon = Text2.Text
totaldiskon = harga / 100 * diskon
Text3.Text = totaldiskon
totalharga = harga - totaldiskon
Label4.Caption = totalharga
End Sub
4. Susun komponen nya sesuai selera hati anda, lalu build/run
0 komentar:
Posting Komentar