tutorialmembuat aplikasi mesin kasir sederhana menggunakan VB 6.0. Buatlah terlebih dahulu folder baru pada windows explorer, sebagai tempat penyimpanan project yang telah kita buat. Pilih standar EXE kemudian open,
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” Padapembahasan kali ini kita akan bahas dan praktekkan cara membuat menu dan toolbar pada Visual BASIC secara sederhana sehingga dapat dipahami dengan mudah. Semoga artikel ini bermanfaat bagi yang sudah tidak sabar ingin mencoba membuat menu pilihan dan toolbar pada program aplikasi Visual BASIC. 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! Berikutini contoh lengkap script program menu makanan. Di dalam prolog, perintah write (‘’) digunakan untuk mencetak, nl digunakan untuk membuat garis baru atau new line. Program Menu Makanan Bahasa C++, Download Gratis Serba User diharuskan memasukan uangnya dahulu, lalu memillih menu minuman. Contoh program c++ membuat menu
BELAJAR PEMROGRAMAN DASAR VISUAL BASIC/STUDIO 2010 Berikut ini saya akan membuat sebuah aplikasi yang sangat dasar/sederhana menggunakan Visual basic/Studio 2010 yaitu “MEMBUAT TABEL MENU MAKANAN DAN MINUMAN”. Sebelum kita mulai membuat TUTORIALNYA, akan lebih barokahnya apabila kita memulai dengan membaca 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 maka tampilannya akan seperti ini, 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 “koding” agar lebih pasih dalam menggunakan rumus pada VB 2010. CARANYA dengan mengklik dua kali pada “form1” yang kosong tersebut kemudian ketik rumus atau formulanya. 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”. Jangan Lupa. 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 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" = "Nasi Goreng" = "Pecel Lele" = "Ayam Bakar" = "Sate Pusut" = "Es Teler" = "Es Alpukat" = "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 = "Nasi Goreng" = " Else = "" = "" End If End Sub Private Sub RadioButton2_CheckedChangedByVal sender As ByVal e As Handles If = True Then = "Pecel Lele" = " 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 = "Sate Pusut" = " Else = "" = "" End If End Sub Jangan Lupa 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 Teler" = " Else = "" = "" End If End Sub Private Sub CheckBox2_CheckedChangedByVal sender As ByVal e As Handles If = True Then = "Es Alpukat" = " 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. Simpan Program Dengan Mengklik Save All. Sekian tutorial dari saya, semoga bermanfaat bagi kita semua. Terima Kasih,Wassalamualaikum “SELAMAT MENCOBA” GOOD LUCK MASUJAM
uBcGfz.