ALATPENGIRIM DATA MENU MAKANAN DAN MINUMAN DENGAN MENGGUNAKAN SISTEM WIRELESS BERBASIS MIKROKONTROLER Hari Ardianto1), Andrew Joewono2) E-mail: hari_ardianto@ Pada umumnya pelayanan menu makanan dan minuman masih konvensional, yaitu dengan cara menu ditulis oleh pelayan.
Hallo Coding Maniak Sudahkah Anda Ngoding Hari Ini ?? Yang akan kita coba buat hari ini adalah membuat Program menu makanan menggunakan visual basic, programnya cukup sederhana dan codingnya juga sedikit jadi saya yakin kalian cepat bisa lah, saya juga akan coba jelaskan sedetail mungkin. Dalam program menu makanan ini akan ada nama restoran, daftar menu makanan dan minuman, bagian untuk menghitung harga makanan dan minuman dan total keseluruhan, setiap kita memasukan jenis pesanan dan porsi harga akan otomatis tertera dan diinputkan sesuai dengan yang ada di daftar menu oke kita langsung lihat gambarannya dibawah untuk lebih jelasnya. Ini adalah tampilan programnya Untuk background, jenis font, dan posisi bisa disesuaikan lah ya sesuai selera saja. Dan ini adalah bagian-bagian yang harus ada dan harus kalian masukan, untuk membuat tampilan seperti diatas dan agar programnya berjalan sukses tentunya. Jenis Name Text Item Label Label1 Nama Restoran kalian GroupBox Groupbox1 Makanan Label Label2 Pesanan Label Label3 Porsi Label Label4 Harga Label Label5 Total Harga ComboBox mak1 Mie Ayam Mie Goreng Mie Aceh Mie Tek Tek Pasta Bihun Goreng ComboBox mak2 Mie Ayam Mie Goreng Mie Aceh Mie Tek Tek Pasta Bihun Goreng TextBox jmak1 TextBox jmak2 TextBox hrgmak1 TextBox hrgmak2 TextBox totmak GroupBox Groupbox2 Minuman Label Label6 Pesanan Label Label7 Porsi Label Label8 Harga Label Label9 Total Harga ComboBox min1 Es Teh Jus Buah Es Kelapa ComboBox min2 Es Teh Jus Buah Es Kelapa TextBox jmin1 TextBox jmin2 TextBox hrgmin1 TextBox hrgmin2 TextBox totmin Panel Panel1 Label Label10 Total Label Label11 Bayar Label Label12 Kembali TextBox total TextBox bayar TextBox kembali Button kliktotal Total Button klikhitung HITUNG Button klikreset Reset Button klikkeluar Keluar Groupbox Daftar Menu Label Label13 Mie Ayam Rp. Label Label14 Mie Goreng Rp. 8000 Label Label15 Mie Aceh Rp. Label Label16 Mie Tek Tek Rp. Label Label17 Pasta Rp. Label Label18 Bihun Goreng Rp. Label Label19 Es Teh Rp. 5000 Label Label20 Jus Buah Rp. 8000 Label Label21 Es Kelapa Rp. 5000 Untuk jenis-jenisnya seperti label, textbox, groupbox dll bisa dilihat di toolbox sebelah kiri dan untuk name, text dan item ada di properties sebelah kanan, setelah semua lengkap ada dan sesuai seperti gambar pertama. Kita lanjut kebagian codingnya, double klik di textbox jmak1 Add caption Lalu masukan code seperti dibawah If = "Mie Ayam" Then = Val * 10000 ElseIf = "Mie Goreng" Then = Val * 8000 ElseIf = "Mie Aceh" Then = Val * 15000 ElseIf = "Mie Tek Tek" Then = Val * 12000 ElseIf = "Pasta" Then = Val * 25000 ElseIf = "Bihun Goreng" Then = Val * 10000 End If Lalu double klik textbox mak2 masukan juga code diatas, seperti yang tadi. Kodingan diatas berfungsi untuk menyesuaikan menu, porsi dan harganya, jadi saat kita memilih menu dan memasukan jumlah porsi textbox harga akan terisi secara otomatis. Lanjut double klik textbox jmin1, lalu masukan code dibawah ini If = "Es Teh" Then = Val * 5000 ElseIf = "Jus Buah" Then = Val * 8000 ElseIf = "Es Kelapa" Then = Val * 5000 End If Masukan juga code diatas di textbox jmin2. Seperti bagian menu makanan, kodingan memiliki fungsi yang sama hanya kali ini untuk di bagian menu minuman. Selanjutnya double klik di button/tombol Total, masukan code berikut. = Val + Val = Val + Val = Val + Val Kode diatas memiliki fungsi untuk menghitung total harga dari semua menu yang telah dipilih dan menampilkannya di textbox ketika kita menekan tombol Total. double klik di button/tombol HITUNG, masukan code dibawah ini = Val - Val If > Then If MsgBox"Uangnya Kurang", vbCritical + vbOKOnly + vbDefaultButton1, "Perhatian" = vbOK Then = "" = "" End If End If Koding diatas berfungsi untuk menghitung total harga dan uang yang dibayarkan, jika uang yang dibayarkan kurang maka akan muncul notifikasi seperti gambar dibawah, dan textbox Bayar dan textbox Kembali akan kembali kosong untuk mengulang kembali. Double klik di button/tombol Reset, masukan kode berikut Koding ini untuk mereset semua proses, mengkosongkan kembali textbox dll untuk mengulang kembali. Yang terakhir double klik di button/tombol Keluar masukan codenya If MsgBox"Anda Yakin Ingin Keluar ?", vbYesNo + vbQuestion + vbDefaultButton1, "keluar" = vbYes Then End If Kodingan ini berfungsi jika user mengklik tombol keluar akan muncul notifikasi untuk menanyakan kembali apakah user benar-benar akan keluar, seperti gambar dibawah Oke Form desain sudah kodingannya juga sudah tinggal kalian coba jalankan programnya, gambar dibawah ini adalah screenshot ketika program dijalankan. Dan ini adalah source code lengkapnya. Public Class Form1 Private Sub jmak1_TextChangedsender As e As Handles If = "Mie Ayam" Then = Val * 10000 ElseIf = "Mie Goreng" Then = Val * 8000 ElseIf = "Mie Aceh" Then = Val * 15000 ElseIf = "Mie Tek Tek" Then = Val * 12000 ElseIf = "Pasta" Then = Val * 25000 ElseIf = "Bihun Goreng" Then = Val * 10000 End If End Sub Private Sub jmak2_TextChangedsender As e As Handles If = "Mie Ayam" Then = Val * 10000 ElseIf = "Mie Goreng" Then = Val * 8000 ElseIf = "Mie Aceh" Then = Val * 15000 ElseIf = "Mie Tek Tek" Then = Val * 12000 ElseIf = "Pasta" Then = Val * 25000 ElseIf = "Bihun Goreng" Then = Val * 10000 End If End Sub Private Sub jmin1_TextChangedsender As e As Handles If = "Es Teh" Then = Val * 5000 ElseIf = "Jus Buah" Then = Val * 8000 ElseIf = "Es Kelapa" Then = Val * 5000 End If End Sub Private Sub jmin2_TextChangedsender As e As Handles If = "Es Teh" Then = Val * 5000 ElseIf = "Jus Buah" Then = Val * 8000 ElseIf = "Es Kelapa" Then = Val * 5000 End If End Sub Private Sub kliktotal_Clicksender As e As Handles = Val + Val = Val + Val = Val + Val End Sub Private Sub klikhitung_Clicksender As e As Handles = Val - Val If > Then If MsgBox"Uangnya Kurang", vbCritical + vbOKOnly + vbDefaultButton1, "Perhatian" = vbOK Then = "" = "" End If End If End Sub Private Sub klikreset_Clicksender As e As Handles End Sub Private Sub klikkeluar_Clicksender As e As Handles If MsgBox"Anda Yakin Ingin Keluar ?", vbYesNo + vbQuestion + vbDefaultButton1, "keluar" = vbYes Then End If End Sub End Class Semoga postingan kali ini juga bermanfaat, silahkan tuliskan komentar dan pertanyaannya dibawah jika ada yang salah atau ada yang kurang jelas, kita disini sama-sama belajar. “Dari Newbie oleh newbie dan untuk newbie”
ApaItu Pengertian Visual Basic : Konsep Dasar [Lengkap] Pemrograman. Microsoft Visual Basic 6.0 di tahun belakangan ini begitu populer. Jika dibandingkan dengan bahasa pemograman lain sebagai contoh developer microsoft visual basic 6.0 lebih banyak digunakan, karena bahasa pemograman yang lain harus menulis program untuk segala sesuatu.
Pada siapa ini saya akan membincangkan adapun pembuatan program terlambat kerjakan mengidas menu ki gua garba. Awalan-langkah 1 Frame,8 Option Button,1 Label dan 1 Command Button Caption Frame menjadi Menu Perut,dan 8 Option Button lainnya ubah caption menjadi menu kandungan nan kalian inginkanBakso,Nasi rendang,Nasi uduk dll. Kemudian atur 8 label tersebut di internal frame begitu juga daftar menu cak bagi name tiap-tiap label ikuti sesuai dengan captionnyaingat tanpa spasi. Pada tera ubah caption menjadi “MAKANAN” Dan lega Command Button ubah caption menjadi “Bestelan FOOD” dan name = order Setelah itu ketikkan code sama dengan ini Private Sub ayamlalapan_Click = “Ayam jantan Lalapan” End Sub Private Sub babiricarica_Click = “Kartu ceki Rica Rica” End Sub Private Sub baksokuah_Click = “Bakso Kuah” End Sub Private Sub buburayam_Click = “Bubur Ayam” End Sub Private Sub nasicampur_Click = “Nasi Campur” End Sub Private Sub pangsitmie_Click = “Pangsit Mie” End Sub Private Sub paniki_Click = “Paniki” End Sub Private Sub nasigoreng_Click = “Nasi Goreng” End Sub Private Sub order_Click MsgBox “Orderan Taajul Disiapkan,Syukur !”, vbInformation, “RUMAH MAKAN BARU” End Sub Hasil nya akan menjadi seperti ini Dan kalau dijalankan ,menu apapun yang kita pilih akan tertulis di pangkal frame,setelah itu kalau kita mengklik proyek food maka akan muncul message box yang berbunyi “Orderan akan disiapkan,Terima Hadiah !” Simpel tak ?Sebenarnya masih ada pendirian yang bertambah pendek,tapi kerjakan awalnya ,saya menciptakan menjadikan program ini memakai percabangan if menaik frame minuman dan tak-tidak sebagainya jika anda ingin berkarya. Sekian postingan pecah saya adapun pembuatan menu alat pencernaan dalam bahasa Visual Basic mantra yang dibagi penting bagi sebagai halnya biasa,Songsong Kasih !
Kalauberbicara soal menu masakan buka puasa, maka tidak jauh-jauh dari masakan Indonesia bukan. Langsung ke konten. Breaking News. Bisnis Kuliner Menguntungkan! Taco dan Kelezatannya, Bisa Membuat Lidah Siapa Saja Menyukainya! Resep Ramen Khas Jepang Ini Bisa Dijadikan Ladang Bisnis Rumahan yang Ramah Dilidah Orang! Kali Ini aku akan membuat program pemesanan makanan dan minuman dengan Simak dengan baik cara-cara berikut ini. Pertama, tool yang kita butuhkan adalah 19 label, 2 combobox, 3 textbox, dan 3 button Kedua, klik sekali combobox yang terdapat dibawah label "Pesan Makanan" Ketiga, lihat sebelah kanan atas, lalu klik view code Keempat, setelah itu, ketik source code seperti contoh dibawah ini Kelima, Klik 2 kali combobox makanan Keenam, Lalukan hal yang sama pada combobox minuman, lalu setelah itu kebagian source nya Ketujuh, klik 2 kali combobox minuman Kedelapan, Klik 2 kali button proses Kesembilan, klik 2 kali button hitung Ksepuluh, yang terakhir jangan lupa untuk memanggil combobox makanan dan combobox minuman dengan cara klik 2 kali layar from2 Selamat Mencoba ShareGroupBox1Text = "Daftar Makanan" GroupBox2.Text = "Yang Sudah di Pilih" GroupBox3.Text = " Daftar Harga" GroupBox4.Text = "Minuman" GroupBox5.Text = "Yang Sudah di Pilih" GroupBox6.Text = "Daftar Harga" Kemudian Untuk Checkboxnya : CheckBox2.Text = "Mie Ayam Spesial" CheckBox3.Text = "Soto Ayam" CheckBox4.Text = "Jus Durian"
Assalamu’alaikum Warahmatullahi Wabarakatuh Tech Tutors – Pada artikel ini, kami akan membagikan cara membuat program pesanan atau order makanan sederhana dengan menggunakan bahasa pemrograman visual basic. Program Pesanan Makanan Langkah yang pertama adalah desain terlebih dahulu form pada project sobat. Dibutuhkan 7 label meliputi Harga pada Makanan, Harga pada Minuman, Label3, Label 4, Berapa Porsi Makanan, Berapa Porsi Minuman, dan Label 7, 2 combobox meliputi CmbMakanan dan CmbMinuman, 2 textbox meliputi TextPorsiMkn dan TextPorsiMnm, sebuah groupbox, sebuah checkbox, dan sebuah button BtnHitung. Untuk gambar formnya dapat dilihat pada gambar di bawah. Selanjutnya double klik form 1 dan tulis kode ini. Public hrgmakanan, hrgminuman As Integer Public Sub New ' This call is required by the designer. InitializeComponent = False = False ' Add any initialization after the InitializeComponent call. End Sub Untuk membuat menu dan harga makanan, double klik CmbMakanan dan tulis kode di bawah ini. Select Case Case "Nasi Uduk" = "Rp. 3500" hrgmakanan = 3500 Case "Bakso" = "Rp. 6000" hrgmakanan = 6000 Case "Mie Ayam" = "Rp. 7000" hrgmakanan = 7000 End Select Lalu agar menu makanan dan harga bisa ditampilkan, silahkan double klik checkbox serta tuliskan kode di bawah ini. If = False Then = False End If If = True Then = True = True End If Setelah itu untuk membuat menu dan harga minuman sobat double klik CmbMinuman dan tulis kode berikut. Select Case Case "Es Jeruk" = "Rp. 3000" hrgminuman = 3000 Case "Jus Alpukat" = "Rp. 7000" hrgminuman = 7000 Case "Teh Manis" = "Rp. 4000" hrgminuman = 4000 End Select Agar total bayarnya muncul, maka double klik BtnHitung dan tuliskan kode dibawah. Dim porsimkn, porsimnm, jumlah As Integer porsimkn = porsimnm = jumlah = hrgmakanan * porsimkn + hrgminuman * porsimnm = "Rp. " & Nah selanjutnya save all dan jalankan program yang telah dibuat dengan tombol run ataupun f5 pada keyboard laptop kalian. Berikut hasil running dari program belanja sederhana. Untuk programnya bisa didownload disini. Demikian yang dapat kami bagikan pada artikel ini. Semoga bisa bermanfaat dan jika ada kesalahan atau kekurangan mohon dimaafkan. Jikalau ada yang tidak dimengerti atau sobat masih bingung pada program yang dibahas tadi, sobat bisa tanyakan pada kolom komentar. Sampai bertemu di artikel berikutnya. Wassalamu’alaikum Warahmatullahi Wabarakatuh gHjTGLk.