Membuat Program Penjualan dg VB

 

Assalamuallaikum wr.wb..

Sob, kali ini saya share cara membuat program pembelian dengan VB nih, caranya adalah sebagai berikut :

1. Buka Aplikasi VB, setelah terbuka tekan Standar.EXE

(ScreentShot)

2. Lalu gunakan tool "LABEL, TEXTBOX, dan CommandButton" untuk memberikan judul dan nama-nama barang dan harganya, mengisi nama dan harga-harganya dan perintah untuk menjumlahkannya (tombol perintah).

(ScreentShot)

LABEL

TextBox

CommandButton

3. Tetelah itu klik 2x pada tombol perintah yang sudah anda buat tadi seperti tombol Hitung, Keluar, dan Masukan Lagi.

Lalu Masukan Program Pada Setiap Perintah Tersebut

Programnya Yaitu :

Tombol "HITUNG"

-------------------------------------------------

Dim JUMLAH As Single

Dim HARGA As Single

Dim BAYAR As Single

Dim Diskon As Single

JUMLAH = Text2.Text

HARGA = Text3.Text

If JUMLAH >= 50 Then

Text5.Text = (JUMLAH * HARGA) * 20 / 100

Else

Text5.Text = 0

End If

Diskon = Text5.Text

Text4.Text = (JUMLAH * HARGA) - Diskon

BAYAR = Text4.Text

---------------------------------------------------

Tombol "KELUAR"

---------------------------------------------------

Unload Me

---------------------------------------------------

Tombol "MASUKAN LAGI"

---------------------------------------------------

Text1.Text = ""

Text2.Text = ""

Text3.Text = ""

Text4.Text = ""

Text5.Text = ""

Text1.SetFocus

---------------------------------------------------

(ScreenShot)

4. Setelah itu klik Start atau tekan F5.

(ScreenShot)

5. Dan isikan oleh anda lalu tekan tombol perintahnya (HITUNG) dan lihat hasilnya !!, mudah kan sob ?? hhe