Program Daftar Menu Restoran Sederhana Menggunakan VB

Assalamualaikum..
Kali ini kita akan membuat sebuah aplikasi “Daftar Makanan Sederhana” dengan menggunakan Visual Basic 6.0

Nah sekarang kita cuma membutuhkan beberpa tool untuk membuat aplikasi ini, yaitu 12 CheckBox, 2 Label, 2 Frame dan 1 Text.


Kalau semua sudah terkumpul saya akan jelaskan bagaimana aplikasi ini berjalan. Saat pertama kali di jalankan tampilan akan seperti di atas dan saat kita mengklik salah satu daftar menu yang sudah di sediakan akan muncul harga barang tersebut di Total dan jika tidak jadi memilih maka harga kembali ke normal sebelum ditambah oleh makan yang kita pilih,  setelah selesi memilih daftar menu maka saatnya untuk membayar makan tersebut, kita masukkan uang sang pelanggan ke “Bayar” setelah itu kita tekan enter maka sisa dari uang pelanggan dari pengurangan harga seluruh makan akan terlihat.

Pembahasan Koding

Private Sub Check9_Click()
If Check9.Value = False Then
Label1.Caption = Val(Label1.Caption – 6000)
Else
Label1.Caption = Val(Label1.Caption + 6000)
End If
End Sub

Untuk menambahkan ketika kita memilih salah satu daftar makanan dan mengurangi saat kita tidak memilih atau tidak jadi memilih.

Private Sub Text2_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then Label2.Caption = Val(Text2.Text – Label1.Caption)
End Sub

Saat selesai menginput uang pelanggan dan kita menekan “enter”, komputer akan menampilkan hasil dari uang pelanggan dengan total belanja ke kembalian.