HanyaInginBerbagi: Program Perhitungan Kasir Sederhana Visual Studio 2010

Pada program ini anda dapat menghitung barang yang dipilih. Untuk program ini anda menggunakan "Label", "ComboBox", "TextBox", dan "Button" yang ada di Toolbox. Dengan demikian anda dapat mengikuti langkah-langkah berikut

1) Tampilkan terlebih dahulu sebuah Form dengan cara membuka aplikasi Microsoft Visual Studio 2010 dan pilih menu File - New Project - Visual Basic -Windows Forms Application - OK. Setelah itu akan muncul Form seperti dibawah ini

2) Untuk mendesignnya anda dapat menambahkan 5 "Label", 1 "ComboBox", 4 "TextBox", 3 "Button"

3) Dan ubah nama textnya menjadi seperti tampilan berikut

4) Double klik di "Proses", "Hitung", dan "Bersih" untuk menambahkan linsting program berikut

Public Class Form1

Dim Kopi, Susu, Sirup, Jumlah_Barang, Jumlah_Pembayaran, Uang_Pembayaran, Sisa As Integer

Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs)

Kopi = 5000

Susu = 8000

Sirup = 10000

Jumlah_Barang = Val(TextBox1.Text)

If ComboBox1.Text = "Kopi" Then

Jumlah_Pembayaran = Kopi * Jumlah_Barang

TextBox2.Text = Jumlah_Pembayaran

ElseIf ComboBox1.Text = "Susu" Then

Jumlah_Pembayaran = Susu * Jumlah_Barang

TextBox2.Text = Jumlah_Pembayaran

ElseIf ComboBox1.Text = "Sirup" Then

Jumlah_Pembayaran = Sirup * Jumlah_Barang

TextBox2.Text = Jumlah_Pembayaran

Else

MsgBox("MASUKAN INPUT BARANG", MsgBoxStyle.Critical, "mesin kasir")

End If

End Sub

Private Sub Button2_Click1(ByVal sender As System.Object, ByVal e As System.EventArgs)

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)

End

End Sub

End Class

5) Setelah itu untuk menjalankan program anda harus memilih "Start Debugging" atau menekan "F5" pada tombol keyboard. Hasil pun akan terlihat seperti tampilan dibawah ini. Dan anda dapat memilih satu barang yang ingin dihitung