131/2015 Sisi Edukasi 0 Contoh Makalah, Visual Basic. Contoh Makalah Visual Basic 6.0 adalah makalah yang mungkin anda cari sebagai bahan contoh atau referensi dalam mengerjakan berbagai tugas makalah pelajaran atau mata kuliah yang berhubungan dengan Komputer, Bahasa Pemrograman, seperti misalnya Membuat Aplikasi Program Penjualan Metode1Membuat Halaman Web Sendiri. 1. Bukalah Notepad. Penyunting teks ini merupakan program bawaan yang tersedia di setiap komputer Windows, dan dapat ditemukan di menu Start. Setelah Notepad terbuka, klik File > Save As, lalu pilih All Files pada kolom File Type. Simpan berkas buatan Anda dalam format HTML. MembuatProgram Penjualan Visual Basic 6 : Membuat Menu Utama Menu Utama digunakan sebagai pusat dari semua form yang telah kita buat. Melalui form inilah kita mengakses semua form yang ada. Dengan Form menu utama ini anda tinggal menekan nama form yang dicari, maka form yang kita pilih akan segera muncul. AplikasiMenu Makanan dengan Visual Basic 2008 - Pada tutorial ini saya akan membuat aplikasi menu makanan sederhana dengan beberapa menu makanan yang tersedia. Adapun ketentuan dalam aplikasi ini adalah sebagai berikut : Ketentuan : Harga 1 porsi Bebek Presto Cabe Hijau (BPCH) adalah Rp. 30.000,- 1 Buat folder baru untuk program kalkulator. Untuk menyimpan semua berkas yang dibutuhkan program, ikuti langkah-langkah berikut: Kunjungi direktori penyimpanan program kalkulator VB6. Klik kanan kolom kosong. Pilih “ New ” pada menu drop-down. Klik “ Folder ”. Tikkan Kalkulator dan tekan tombol ↵ Enter. CaraMembuat Burgo, Makanan Khas Palembang, Coba Sajikan sebagai Menu Berbuka Puasa Masyarakatperlu disadarkan akan pentingnya kesehatan lingkungan yang baik jika ingin menciptakan komunitas yang sehat dan bahagia. Apabila mereka mampu menjaga lingkungan dengan baik secara tanggung jawab, munculnya banyak penyakit, yang umumnya dikarenakan adanya lingkungan kotor, dapat dihindari. Saat melakukan proses inisiasi Nah silahkan double klik pada Form1, ingat ya Form1 bukan Label, ComboBox, ataupun ListBox apalagi Button:v. Masukan code syntax nya seperti pada gambar di bawah ini ya! => ComboBox1.Items,Add ("") //Makanan. => ComboBox2.Items.Add ("") //Minuman. Terlebih dahulu kita isikan ComboBox nya dengan makanan atau minuman yang ingin kita masukan MembuatProgram Hitung Makanan Porsi menggunakan Visual Basic 2010 . saya akan membuat program dimana jika kita memilih menu makan dan minuman dia akan menampilkan harga susai dengan menu yang kita pilih, lalau harga tersebut akan di total kan dengan porsi yang kita inginkan. Kali ini saya mau share cara bikin E-Mail Hotmail (Windows Kaliini kita akan membuat kalkulator sederhana menggunakan Visual Basic 6.0 yang didalamnya terdapat tambah, kurang, kali, bagi, sama dengan (hasil) dan hapus. Yuk langsung saja kita buat kalkulatornya! Cara Membuat Kalkulator Sederhana di Visual Basic 6.0 1. Pertama, buka visual basic dan pilih Standard EXE , klik open . Baca Juga : membuat CaraMembuat Data Base Restoran Menggunakan Visual Basic 6.0 (VB) Oleh. Nama : Renotua Bagariang daftar menu makanan dan minuman caranya klik dua kali pada salah satu menu makanan dini akan muncul semua mulai dari menu makanan dan minum dan rumusmnya akan saya copy di bawah gambar Cara membuat Biodata Sederhana menumakanan dan minuman yang sering dipesan oleh pelanggan, membantu mengurangi kesalahan dalam mencatat menu yang dipesan dan dapat membantu dalam proses transaksi pembayaran, yang berguna untuk mengurangi kesalahan pada saat perhitungan total bayar. Kata kunci: Aplikasi, Pemesanan, Microsoft Visual Studio 2012. Abstract assalamualaikumkali ini sya membuat aplikasi menu makanan di visual basic. 6 untuk info lebih lanjut selihkan tonton videonya sampai subsc Disinikita akan belajar secara santai dan enjoy, apalagi malam minggu nihh, buat para jones, jofish, dan jomblo-jomblo jenis lain kita malming bersama visual mikro biar malmingnya barokah. hahaha. Dalam mem-Plot grafik pada tutorial ini, Visual Mikro menyediakan sintak (kode program) “@Plot” yang khusus untuk memplot grafik. Kaliini admin menulis Cara Membuat Program Rental Mobil Menggunakan Visual Basic. Program Penyewaan Lapangan Fut S8Rp8sg. Visual Basic adalah salah satu bahasa pemrograman yang banyak digunakan untuk membuat aplikasi desktop. Salah satu aplikasi yang dapat dibuat dengan menggunakan Visual Basic adalah menu makanan. Dalam artikel ini, kita akan membahas cara membuat menu makanan dengan Visual Basic. Persiapan Sebelum kita mulai membuat menu makanan, ada beberapa hal yang perlu dipersiapkan. Pertama, pastikan Anda sudah menginstal Visual Basic di komputer Anda. Kedua, siapkan gambar-gambar makanan yang akan dimasukkan ke dalam menu. Anda juga dapat mencari gambar-gambar makanan di internet sebagai referensi. Membuat Tampilan Menu Langkah pertama dalam membuat menu makanan adalah membuat tampilan menu. Untuk itu, buka Visual Basic dan buatlah sebuah form baru. Kemudian, pada toolbox, cari dan tariklah sebuah picture box ke dalam form. Picture box ini akan digunakan untuk menampilkan gambar-gambar makanan. Selanjutnya, buatlah sebuah label untuk menampilkan nama makanan dan sebuah label lagi untuk menampilkan harga makanan. Anda dapat menempatkan label-label ini di bawah picture box. Kemudian, buatlah sebuah combo box yang berisi daftar makanan yang akan ditampilkan. Anda juga dapat menambahkan sebuah tombol untuk memesan makanan. Membuat Kode Program Setelah tampilan menu selesai dibuat, selanjutnya adalah membuat kode program untuk menampilkan gambar-gambar makanan dan menampilkan nama dan harga makanan. Untuk itu, buatlah sebuah file baru dengan format .txt dan beri nama “ Pada file “ ini, tuliskan daftar makanan beserta gambar dan harganya. Setiap makanan harus dipisahkan dengan karakter “;” dan setiap baris harus dipisahkan dengan karakter baru. Berikut ini adalah contoh isi dari file “ - Nasi Goreng; Mie Goreng; Sate Ayam; Setelah file “ selesai dibuat, selanjutnya adalah membuat kode program untuk membaca file “ dan menampilkan gambar-gambar makanan beserta nama dan harga makanan. Berikut ini adalah contoh kode program untuk menampilkan gambar-gambar makanan. Dim daftarMakanan As String = i As Integer = 0 To - 1Dim makanan As String = daftarMakanani.Split";" = makanan1 = Setelah kode program untuk menampilkan gambar-gambar makanan selesai dibuat, selanjutnya adalah membuat kode program untuk menampilkan nama dan harga makanan. Berikut ini adalah contoh kode program untuk menampilkan nama dan harga makanan. Dim daftarMakanan As String = i As Integer = 0 To - 1Dim makanan As String = daftarMakanani.Split";" Sub ComboBox1_SelectedIndexChangedsender As Object, e As EventArgs Handles indexMakanan As Integer = makanan As String = daftarMakananindexMakanan.Split";" = makanan0 = "Rp " & makanan2End Sub Menambahkan Tombol Pemesanan Setelah kode program selesai dibuat, selanjutnya adalah menambahkan tombol pemesanan. Untuk itu, buatlah sebuah tombol dan beri nama “Pesan”. Kemudian, tambahkan kode program berikut ini untuk menampilkan pesan konfirmasi setelah tombol “Pesan” ditekan. Private Sub Button1_Clicksender As Object, e As EventArgs Handles Anda telah diterima. Terima kasih telah memesan makanan."End Sub Kesimpulan Sekarang Anda sudah tahu cara membuat menu makanan dengan Visual Basic. Dengan mengikuti langkah-langkah di atas, Anda dapat membuat menu makanan yang menarik dan mudah digunakan. Selamat mencoba! LAPORAN AKHIR PRAKTIKUM Nama Ema Dwi K NPM 23114547 Kelas 1KB07 Materi Visual Basic 6 Tanggal 16 Oktober 2014/23 Oktober 2014 Asisten Baris Ketua Asisten Paraf Asisten ..................... UNIVERSITAS GUNADARMA LABORATORIUM SISTEM KOMPUTER 2014/2015 Visual Basic merupakan bahasa pemograman komputer. Bahasa pemograman adalah perintah-perintah atau instruksi yang dimengerti oleh komputer untuk melakukan tugas-tugas tertentu. Visual Basic selain disebut sebagai bahasa pemograman, juga sering disebut sebagai sarana tool untuk menghasilkan program-program aplikasi berbasiskan windows. Visual Basic memungkinkan pembuatan aplikasi Graphical User Interface GUI atau pemograman yang menggunakan tampilan grafis sebagai alat komunikasi dengan pemakainya. Dalam Visual Basic untuk pembuatan tampilan user interface relatif mudah dilakukan karena hanya perlu meletakkan objek-objek grafis ke sumber form yang sudah disediakan Visual Basic. Setelah itu cukup mengatur properti dari objek-objek tersebut. Inilah Tampilan awal saat membuka aplikasi Visual Basic Membuat Program Membuat program sederhana dengan menggunakan Visual Basic salah satu contoh program yang akan dibuat adalah Daftar Menu Makanan. Berikut adalah cara membuat Project Daftar Menu Makanan Buka aplikasi Visual Basic Setelah Aplikasi di buka, pilih menu untuk membuat program. Lalu klik Open Setelah itu, kita buat nama pada bagian yang ingin kita beri nama dengan Label. Lalu ganti nama label dengan Daftar Makanan. Untuk menggantinya klik label yg sudah kita buat pada form lalu pada kolom Propertise sebelah kanan terdapat caption lalu ganti label 1 menjadi Daftar Makanan. Setelah membuat label , buat 1 combobox . Lakukan cara diatas berulang label 2 di ganti dengan nama Pesanan, lebel 3 diganti dengan nama Harga, label 4 diganti dengan nama Jumlah Harga. Setelah itu kita buat kolom untuk mengisi data keterangan yang akan d hitung oleh komputer dengan menggunakan Textbox .Lalu kosongkan nama text1 pada kolom sebelah kanan. Setelah itu buat lagi dibawah kolom kosong yg sudah dibuat sebelumnya dan kosongkan nama text2. Buat lagi text3 lalu kosongkan nama text3. Setelah itu, buat tombol yang akan digunakan pada program dengan menggunakan CommandButton , commandButton yang saya gunakan 2 CommandButton. Setelah itu membuat kolom list . SetelahTampilan menjadi seperti diatas langkah selanjutnya ialah 1. Double Klik Pada CommandButton1Tambah Pesanan, Masukan codingan sebagai berikut Private Sub Command1_Click If Combo1 = "Paket Pecel Ayam" Then = "Paket Pecel Ayam" = 15000 End If Dari perintah tersebut dimaksudkan jika di combo 1 terdapat daftar makanan Paket Pecel Ayam maka di text1 akan muncul tulisan Paket Pecel Ayam dan di Text2 akan muncul harga dari Paket Pecel Ayam sebesar If Combo1 = "Paket Pecel Lele" Then = "Paket Pecel Lele" = 13000 End If Dari perintah tersebut dimaksudkan jika di combo 1 terdapat daftar makanan Paket Pecel Lele maka di text1 akan muncul tulisan Paket Pecel Lele dan di Text2 akan muncul harga dari Paket Pecel Lele sebesar If Combo1 = "Sate Ayam" Then = "Sate Ayam" = 15000 End If Dari perintah tersebut dimaksudkan jika di combo 1 terdapat daftar makanan Sate Ayam maka di text1 akan muncul tulisan Sate Ayam dan di Text2 akan muncul harga dari Sate Ayam sebesar If Combo1 = "Sate Kambing" Then = "Sate Kambing" = 20000 End If Dari perintah tersebut dimaksudkan jika di combo 1 terdapat daftar makanan Sate Kambing maka di text1 akan muncul tulisan Sate Kambing dan di Text2 akan muncul harga dari Sate Kambing sebesar If Combo1 = "Teh Manis" Then = "Teh Manis" = 3000 End If Dari perintah tersebut dimaksudkan jika di combo 1 terdapat daftar makanan Teh Manismaka di text1 akan muncul tulisan Teh Manis dan di Text2 akan muncul harga dari Teh Manis If Combo1 = "Jeruk Manis" Then = "Jeruk Manis" = 5000 End If Dari perintah tersebut dimaksudkan jika di combo 1 terdapat daftar makanan Jeruk Manis maka di text1 akan muncul tulisan Jeruk Manis dan di Text2 akan muncul harga dari Jeruk Manis sebesar If Combo1 = "Es/Hangat" Then = "Es/Hangat" = 500 End If Dari perintah tersebut dimaksudkan jika di combo 1 terdapat daftar makanan Es/Hangat maka di text1 akan muncul tulisan Es/Hangat dan di Text2 akan muncul harga dari Es/Hangat sebesar If Combo1 = "Paket Pecel Ayam" Then "Paket Pecel Ayam" If Combo1 = "Paket Pecel Lele" Then "Paket Pecel Lele" If Combo1 = "Sate Ayam" Then "Sate Ayam" If Combo1 = "Sate Kambing" Then "Sate Kambing" If Combo1 = "Teh Manis" Then "Teh Manis" If Combo1 = "Jeruk Manis" Then "Jeruk Manis" If Combo1 = "Es/Hangat" Then "Es/Hangat" If Combo1 = "Paket Pecel Ayam" Then " 15000" If Combo1 = "Paket Pecel Lele" Then " 13000" If Combo1 = "Sate Ayam" Then " 15000" If Combo1 = "Sate Kambing" Then " 20000" If Combo1 = "Teh Manis" Then " 3000" If Combo1 = "Jeruk Manis" Then " 5000" If Combo1 = "Es/Hangat" Then " 500" Perintah Di Atas menunjukan bahwa jika combo1 muncul pesanan paket pecel ayam dan ditambah menu selanjutnya maka di list 1 akan muncul daftar pesanan dan di list 2 akan ditampilkan daftar harga . Setelah itu double klik pada CommandButton2 Jumlah Harga, masukan perintah sebagai berikut Private Sub Command2_Click Dim totalbelanja As Long Dim t As Integer totalbelanja = 0 For t = 0 To - 1 totalbelanja = totalbelanja + Val Next = totalbelanja End Sub Setelah itu double klik pada form, masukan perintah sebagai berikut Private Sub Form_Load "Paket Pecel Ayam" "Paket Pecel Lele" "Sate Ayam" "Sate Kambing" "Teh Manis" "Jeruk Manis" "Es/Hangat" End Sub Setelah semua perintah sudah dimasukan, kita lakukan test drive dengan me-running program yang baru kita buat dengan cara, klik icon Start pada toolbar diatas. Maka program akan berjalan seperti pada contoh berikut. Setelah program berjalan dengan lancar, kita buat program ini agar bisa dibuka dan berjalan normal seperti pada program umumnya, dengan cara sebagai berikut Klik File > Pilih Make >Pilih tujuan penyimpanan program dan Beri nama Daftar Menu Makanan pada kolom isian nama yang tersedia > Klik OK. Selesai Berikut ini saya akan “MEMBUAT TABEL MENU MAKANAN DAN MINUMAN”. melalui coding Baiklah langsung saja kita memulai, akan lebih barokahnya apabila kita memulai dengan membaca basmalah. Bismillahirrohmaanirrohiimm. Langkah pertama membuka aplikasi Visual Studio 2010. Klik shortcut VB 2010 pada menu desktop. Contoh Atau bisa melalui start All Program Microsoft Visual Studio 2010 Contoh Langkah kedua. Sebelum masuk kedalam VB 2010 maka akan tampil gambar seperti dibawah ini kemudian pilih pada menu “New Project...” Setelah menekan New Project... maka akan tampil tampilan seperti gambar dibawah ini, kemudian klik/tekan OK Setelah anda masuk kedalam VB 2010 disana akan ada tampilan Form1 yang berfungsi untuk tempat memasukkan menu yang digunakan pada toolbox, jika toolbox pada layar tidak tampil dan hanya properties saja yang tampil maka ketik pada keyboard anda “Ctrl+Alt+ X Jika ingin mengganti nama “form1” bisa anda melakukannya dengan mengganti dari properties dengan menggantinya dalam menu “text” dan anda bisa melakukannya dengan menggunakan “coding” agar lebih pasih dalam menggunakan rumus pada VB 2010. CARANYA dengan mengklik dua kali pada “form1” yang kosong tersebut kemudian ketik rumus nya Dan anda bisa memperbesar lembar kerja/”form1” dengan mengarahkan kursor kearah pojok dari “form1” dan menariknya lebih besar. Cara mengubah nama “form1” menggunakan nama lain seperti “Latihanku” adalah Masukkan rumus ditengah-tengah antara “private sub” dengan “End Sub” seperti dibawah ini Private Sub Form1_LoadByVal sender As ByVal e As Handles = "Latihanku" Koding yang benar. End Sub Setelah anda mengisi koding/rumus maka “RUN” pada menu yaitu “start debuggingF5” setelah hasilnya keluar maka akan tampil seperti ini. Jangan lupa ketika anda ingin melanjutkan untuk memasukkan koding/rumus maka stop dulu “RUN”nya dengan menekan icon “X” berwarna merah pada form1/”Latihanku” pada gambar diatas. Atau bisa dilakukan dengan menekan “stop debuggingCtrl+Alt+Break”. Ingat. mengisi koding harus seperti pada teks diatas, tanpa harus perlu menggunakan “spasi” karena apabila koding/rumusnya memang benar maka secara otomatis koding tersebut mempunyai jarak atau spasi. Apabila anda memasukkan koding/rumus kemudian ada garis bawah pada koding tersebut maka anda memasukkan koding dengan cara yang salah. Contoh koding yang benar dan setelah di “RUN” seperti gambar dibawah ini Baiklah setelah semuanya beres langsung saja kita praktikkan bagaimana cara membuat “tabel menu makanan dan minuman” pada VB 2010. BAHAN-BAHAN - Dua buah “Groupbox” - Empat buah “Label” - Empat buah “Textbox” - Empat buah “Radiobutton” - Dan empat buah “Checkbox” Aturlah menu form1/”Latihanku” seperti gambar di bawah ini Setelah anda mengaturnya seperti ini silahkan anda masuk ke dalam koding pada menu form1/”Latihanku” dengan cara mengklik 2 kali. Dan masukkanlah koding seperti ini Private Sub Form1_LoadByVal sender As ByVal e As Handles = "LATIHANKU" = "MENU MAKANAN" = "MENU MINUMAN" = "MAKANAN" = "HARGA" = "MINUMAN" = "HARGA" = "bakso" = "mie ayam" = "Ayam Bakar" = "nasi padang" = "Es Teh manis" = "Es kelapa muda" = "Kopi" = "Teh Manis" End Sub Setelah anda memasukkan semua koding di atas kemudian kliklah 2 kali pada radio button untuk memasukkan kodingnya agar bisa menampilkan makanan dan harga yang anda pilih. Contoh Private Sub RadioButton1_CheckedChangedByVal sender As ByVal e As Handles If = True Then = "bakso" = " Else = "" = "" End If End Sub Private Sub RadioButton2_CheckedChangedByVal sender As ByVal e As Handles If = True Then = "mie ayam" = " Else = "" = "" End If End Sub Private Sub RadioButton3_CheckedChangedByVal sender As ByVal e As Handles If = True Then = "Ayam Bakar" = " Else = "" = "" End If End Sub Private Sub RadioButton4_CheckedChangedByVal sender As ByVal e As Handles If = True Then = "nasi padang" = " Else = "" = "" End If End Sub INGAT Masukkanlah koding diatas secara satu persatu pada setiap “Radiobutton” anda bisa copy paste untuk lebih mempertmudah anda, dan mengganti nomer dari setiap radiobutton tersebut beserta nama menu makanan dan harganya. Setlah anda menjalankannya atau “RUN” maka hasilnnya seperti ini. Setelah seperti ini sekarang adalah langkah terakhir anda yaitu memasukkan koding pada “Checkbox” secara satu persatu seperti peraturan pada “Radiobutton” diatas. Contoh Private Sub CheckBox1_CheckedChangedByVal sender As ByVal e As Handles If = True Then = " = "Es teh manis" Else = "" = "" End If End Sub Private Sub CheckBox2_CheckedChangedByVal sender As ByVal e As Handles If = True Then = " = "Es kelapa muda" Else = "" = "" End If End Sub Private Sub CheckBox3_CheckedChangedByVal sender As ByVal e As Handles If = True Then = " = "Kopi" Else = "" = "" End If End Sub Private Sub CheckBox4_CheckedChangedByVal sender As ByVal e As Handles If = True Then = " = "Teh Manis" Else = "" = "" End If End Sub End Class Setelah anda “RUN” maka hasilnya seperti ini. Sekian tutorial dari saya, dan terimakasih... kalau ada salah kata mohon di maklumi. dan kalau ada salah ketikan tinggalkan pesan “SELAMAT MENCOBA” GOOD LUCK 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”

cara membuat menu makanan dengan visual basic