Source Code Membuat Kasir Sederhana dengan Visual Basic

Untuk membuat kasir sederhana dengan visual basic ikuti langkah-langkah berikut :
1. Buka aplikasi Microsoft Visual Basic 2010

2. Kemudian klik New Project.

3. Maka akan muncul gambar seperti dibawah ini :

Pilih Windows Forms Application. Kemudian ketik nama dan lokasi yang diinginkan klik OK.
Maka akan muncul form seperti dibawah ini :

4. Klik ToolBox, kemudian pilih Label, ComboBox, TextBox dan Button.

Kemudian, gantikan nama Label1 menjadi “Input Barang”, Label2 menjadi “Input Jumlah”, Label3 menjadi “Total Uang yang Harus Dibayar”, Label4 menjadi “Kembalian”, Button1 menjadi “Hitung”, Button2 menjadi “Clear”, dan Button3 menjadi “Proses”.
Maka akan tampak seperti gambar dibawah ini :

5. Double klik pada Button1, Button2, dan Button3. Kemudian isi listing program seperti dibawah ini :

Public Class Form1
Dim Susu, Gula, Roti, Jumlah_Barang, Jumlah_Pembayaran, Uang_Pembayaran, Sisa As Integer

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Uang_Pembayaran = Val(TextBox3.Text)
Sisa = Uang_Pembayaran – Jumlah_Pembayaran
TextBox4.Text = Sisa
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Susu = 5000
Gula = 10000
Roti = 6000
Jumlah_Barang = Val(TextBox1.Text)
If ComboBox1.Text = “Susu” Then
Jumlah_Pembayaran = Susu * Jumlah_Barang
TextBox2.Text = Jumlah_Pembayaran
ElseIf ComboBox1.Text = “Gula” Then
Jumlah_Pembayaran = Gula * Jumlah_Barang
TextBox2.Text = Jumlah_Pembayaran
ElseIf ComboBox1.Text = “Roti” Then
Jumlah_Pembayaran = Roti * Jumlah_Barang
TextBox2.Text = Jumlah_Pembayaran
End If

End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
End
End Sub
End Class

6. Kemudian Save and Start Debugging.

Maka akan muncul seperti ini :

Note :

Untuk mengisi nama barang pada ComboBox perhatikan gambar dibawah ini :

Setelah klik Edit Items akan muncul seperti ini :

Kita dapat mengisi nama barang yang kita inginkan di String Collection Editor.

Proses pada Form digunakan untuk menghitung total uang yang harus dibayar, sedangkan Hitung untuk mencari uang kembalian.

Sekian langkah-langkah cara membuat kasir sederhana dengan Visual Basic. Semoga Bermanfaat ^^

Mohon kritik dan sarannya ya ^^

Browse More Articles

Tweet

Written by Unknown

We are Creative Blogger Theme Wavers which provides user friendly, effective and easy to use themes. Each support has free and providing HD support screen casting.