Pada postingan ini saya akan membahas tentang pembuatan program select Case denganvisual basic 6.0.Selamat Membaca !
Select Case digunakan untuk membuat percabangan yang banyak.Selain menggunakan percabangan if,Select Case juga dapat menjadi salah satu pilihan kita untuk membuat percabangan agar coding tidak terlalu rumit.Program sederhana yang akan kita buat adalah : Program memilih menu makanan sesuai dengan nomor menu masing2.
Langkah-langkah pembuatan program :
1.Tarik 3 label,3 Textbox dan 1 Command Button
2.Ubah Caption Label menjadi Nomor Menu,Nama Menu dan Harga
3.Ubah Caption Command button menjadi Lihat Menu
4.Kemudian ubah Name Textbox masing-masing menjadi nomenu,nama,harga dan untuk command button ubah menjadi lihat
5.Kemudian setting objek sedemikian rupa agar terlihat rapi sesuai keinginan masing-masing
6.Dan ketikkan coding berikut !
CODE PROGRAM
Tuliskan kode berikut di tombol lihat menu!
Private Sub lihat_Click()
nomor = Val(nomenu)
Select Case nomor
Case 1: nama = "Nasi Goreng"
harga = "12000"
Case 2: nama = "Mie Goreng"
harga = "10000"
Case 3: nama = "BiHun Goreng"
harga = "12000"
Case 4: nama = "Kwetiau Goreng"
harga = "15000"
Case 5: nama = "Bakso Goreng"
harga = "10000"
Case 6: nama = "Mie Bakso"
harga = "15000"
Case 7: nama = "Ayam Penyet"
harga = "14000"
End Select
End Sub
HASIL PROGRAM
Sekian postingan saya tentang program sederhana menggunakan select case.Semoga ilmu yang dibagi dapat bermanfaat bagi pembaca.Terima Kasih !
Comments
Post a Comment