PROGRAM SEDERHANA MENU MAKANAN VISUAL BASIC 6.0

Posted by on
Pada kali ini saya akan membahas tentang pembuatan program sederhana untuk memilih menu makanan.

Langkah-langkah :

  1. 1.Tarik 1 Frame,8 Option Button,1 Label dan 1 Command Button
  2. 2.Ubah Caption Frame menjadi Menu Makanan,dan 8 Option Button lainnya ubah caption menjadi menu makanan yang kalian inginkan(Bakso,Nasi goreng,Nasi uduk dll).
  3. Kemudian atur 8 label tersebut di dalam frame seperti daftar menu biasanya.Dan untuk name masing-masing label ikuti sesuai dengan captionnya(ingat tanpa spasi).
  4. Pada label ubah caption menjadi "MAKANAN"
  5. Dan pada Command Button ubah caption menjadi "ORDER FOOD" dan name = order
  6. Setelah itu ketikkan code seperti ini :
 Private Sub ayamlalapan_Click()

     Label1.Caption = "Ayam Lalapan"
End Sub

Private Sub babiricarica_Click()
     Label1.Caption = "Babi Rica Rica"
End Sub

Private Sub baksokuah_Click()
    Label1.Caption = "Bakso Kuah"
End Sub

Private Sub buburayam_Click()
     Label1.Caption = "Bubur Ayam"
End Sub

Private Sub nasicampur_Click()
    Label1.Caption = "Nasi Campur"
End Sub

Private Sub pangsitmie_Click()
     Label1.Caption = "Pangsit Mie"
End Sub

Private Sub paniki_Click()
    Label1.Caption = "Paniki"
End Sub

Private Sub nasigoreng_Click()
    Label1.Caption = "Nasi Goreng"
End Sub

Private Sub order_Click()
    MsgBox "Orderan Segera Disiapkan,Terima Kasih !", vbInformation, "RUMAH MAKAN BARU"
End Sub

Hasil nya akan menjadi seperti ini :


Dan jika dijalankan ,menu apapun yang kita pilih akan tertulis di bawah frame,setelah itu jika kita mengklik order food maka akan muncul message box yang berbunyi "Orderan akan disiapkan,Terima Kasih !"

Simpel bukan ?Sebenarnya masih ada cara yang lebih singkat,tapi untuk awalnya ,saya membuat program ini memakai percabangan if saja.Silahkan menambah frame minuman dan lain-lain sebagainya jika anda ingin berkreasi.

Sekian postingan dari saya mengenai pembuatan menu makanan dalam bahasa Visual Basic 6.0.Semoga ilmu yang dibagi bermanfaat bagi pembaca.Dan seperti biasa,Terima Kasih !

Comments

Post a Comment