Selamat malam teman teman semua. Malam ini pukul 00.00 saya mencoba untuk membagi sebuah artikel tentang Cara Membuat Daftar Menu Dengan Option dan List di Visual Basic 6. Mungkin seperti ini contohnya aplikasinya.
Sebuah aplikasi komputer sederhana yang bisa dikembangkan lebih baik dari ini. Saya contohkan membuat suatu daftar film yang jika kita mengklik tombol "Drama" atau yang lainnya maka muncul daftar film yang berisi film Drama. Tentunya nama nama film tersebut kita sendiri yang menambahkan di source code nya. Yang lebih ditekankan pada artikel ini adalah bagaimana Cara menampilkan item dari Option yang kita buat ke list yang sudah tersedia.
- Untuk pertama yang dilakukan kita menyusun komponen apa saja yang di pakai di Visual Basic.
Tambahkan komponen utama diatas dan susun sesuai selera kita masing masing. Untuk mempermudah susun sama seperti di artikel ini.
- Setelah di susun sesuai kita. Isikan Source Code pada masing masing komponen dengan klick 2 kali pada masing masing komponen.
Komponen Yang Digunakan :
Option : Option1, Option2, Option3
Command : Command1
List : List1
SOURCE CODE
Command1 :Private Sub Command1_Click()
End
End Sub
End
End Sub
OPTION :
Private Sub Option1_Click()
List1.Clear
List1.AddItem "Go 30th Years"
List1.AddItem "Cinderella Man"
List1.AddItem "Chasing Liberty"
End Sub
Private Sub Option2_Click()
List1.Clear
List1.AddItem "Shark Boy and Lava Girl"
List1.AddItem "Spy Kids"
List1.AddItem "The Lord Of The Ring"
List1.AddItem "Starwars"
List1.AddItem "Matrik"
End Sub
Private Sub Option3_Click()
List1.Clear
List1.AddItem "Skull"
List1.AddItem "Spesies II"
End Sub
Private Sub Option1_Click()
List1.Clear
List1.AddItem "Go 30th Years"
List1.AddItem "Cinderella Man"
List1.AddItem "Chasing Liberty"
End Sub
Private Sub Option2_Click()
List1.Clear
List1.AddItem "Shark Boy and Lava Girl"
List1.AddItem "Spy Kids"
List1.AddItem "The Lord Of The Ring"
List1.AddItem "Starwars"
List1.AddItem "Matrik"
End Sub
Private Sub Option3_Click()
List1.Clear
List1.AddItem "Skull"
List1.AddItem "Spesies II"
End Sub
PENJELASAN PROGRAM
Note : Program Source Code berwarna biru adalah Program yang wajib di isi sedangkan yang merah bisa diganti dengan keinginan kita (didalam tanda "nama film")
Command1 :
Hanya sebagai tombol untuk menutup sebuah aplikasi berisi perintah "End" yang artinya Selesai.
Option :
List1.Clear = untuk mengosongkan tulisan yang ada di List1
List1.AddItem "Go 30th Years" = untuk menampilkan tulisan (Go 30th Years) di Listbox
List1.AddItem "Cinderella Man" = untuk menampilkan tulisan (Cinderella Man) di Listbox
Dan hasil dari Source code yang dibuat tadi seperti ini.
Jadi Kesimpulannya Progam di atas digunakan untuk Menampilkan Tulisan di List Box dengan Tombol Option. Cukup sederhana saja. Tinggal Pengembangan dari kita sendiri. Dasar dasar dari visual basic mari kita share bersama sama.
Ikuti terus artikel di Ajifahreza.com. Belajar dari awal elektronika visual basic dan mikrokontroler. Disini saya juga belajar dan sharing. Cukup sedikit semoga bermanfaat. Menampilkan Tulisan di Listbox. Terima Kasih