Belajar Visual Basic : Aplikasi Penjualan Sederhana

 

Untuk para adik adik yang sekolah menengah kejuruan jurusan informatika khususnya Rekayasa Perangkat Lunak dan untuk para abang abangku yang sudah semester 4 atau 3, berikut saya posting aplikasi penjualan yang sangat sederhana dengan menggunakan visual basic 6.0 yang saya pelajari dulu di Smkn 2 langsa tercinta =D.

Langsung saja saya praktikan bagaimana membuat aplikasi penjualan sederhana menggunakan visual basic 6.0. Sekarang coba buka program visual basic nya. Kemudian siapkan satu buah form dengan tambahan beberapa
komponen berikut :

No	Komponen	Name	Text	Caption
1	Text1	txtHarga	-	-
2	Text2	txtJumlah	-	-
3	Text3	txtInput	-	-
4	Label1	Label1	-	Aplikasi Penjualan Sederhana
5	Label2	Label2	-	Harga Barang
6	Label3	Label3	-	Jumlah
7	Label4	Label4	-	Pembayaran
8	Label5	Label5	-	Total Bayar
9	Label6	Label6	-	Kembalian
10	Label7	lblTotal	-	0
11	Label8	lblKembali	-	0
12	CommandButton1	cmdHitung	-	&Hitung
13	CommandButton2	cmdBersih	-	&Bersih

Setelah itu susun masing-masing komponen hingga membentuk sebuah user interface seperti ini :

Setelah itu coba tuliskan kode berikut pada masing-masing tombol :

Tombol Hitung ( cmdHitung )

Private Sub cmdHitung_Click()

    Dim Bayar, Kembali

    Bayar = txtHarga.Text * txtJumlah.Text

    Kembali = txtInput.Text - Bayar

    lblTotal.Caption = Bayar

    lblKembali.Caption = Kembali

End Sub

Tombol Bersih ( cmdBersih )

Private Sub cmdBersih_Click()

    txtHarga.Text = ""

    txtJumlah.Text = ""

    txtInput.Text = ""

    lblTotal.Caption = "0"

    lblKembali.Caption = "0"

    txtHarga.SetFocus

End Sub

Coba Jalankan dan lihat hasilnya ...

Sekolah yang rajin jangan contoh abangmu ini kerjaannya online aja..

tapi gak apa abangmu ini online yang positif gak seperti kalian negatif aja kerjanya :p
hahahah