3 CARA MENGISI LISTBOX DAN COMBOBOX Pada VB6

List Box adalah tool dalam VB 6 yang berisi daftar isan yang dapat di gulung, sedangkan ComboBox digunakan untuk menghasilkan kontrol yang merupakan kombinasi dari listbox dan textbox, sehingga user bisa memasukkan pilihan melalui daftar atau menuliskannya, nah untuk mengisi combobox dan listbox sedikitnya ada 3 cara sebagai berikut :
1. Dengan mengubah setting pada propertiesnya
2. Dengan menambahkan code (untuk isian yang telah ditentukan dan statis)
3. Dengan menambahkan code (untuk isian yang dapat berubah-ubah atau dinamis)

a.d 1. Dengan mengubah setting pada propertiesnya
setelah menambahkan ComboBox dan ListBox setting properties pada item List, isi secara manual. Biasanya Combo dan List lazim dipakai untuk isian yang lebih dari satu (baris), dalam pengisian secara manual untuk berpindah baris tekan tombol Ctrl + Enter secara bersamaan kemudian ketik isian dan ulangi langkah tersebut sampai sejumlah baris yang diinginkan setelah itu akhiri dengan Enter. Selesai dech …
a.d 2. Dengan menambahkan code (untuk isian yang telah ditentukan dan statis)
Cara yang satu ini adalah dengan coding, selain combobox dan lisbox tambahkan juga dua buah command. Next copy code di bawah ini :
Private Sub Command1_Click()
'menambahkan isi combo2
Combo2.AddItem "SATU"
Combo2.AddItem "DUA"
Combo2.AddItem "TIGA"
Combo2.AddItem "EMPAT"
'menambahkan isi list2
List2.AddItem "SATU"
List2.AddItem "DUA"
List2.AddItem "TIGA"
List2.AddItem "EMPAT"
End Sub
Private Sub Command2_Click()
'menghapus semua isian di combo2 dan list2
Combo2.Clear
List2.Clear
End Sub
Jalankan Form (atau tekan F5), nah terus click command1, lihat hasilnya list dan combo sudah terisi dengan nilai-nilai yang dituliskan dalam coding. Gimana mudah kan?
a.d 3. Dengan menambahkan code (untuk isian yang dapat berubah-ubah atau dinamis)
Cara yang satu ini membutuhkan nilai tertentu untuk mengisi combo dan list ketika program dijalankan. Sebagai contoh tambahkan sebuah textbox. Kemudian copy code dibawah ini :
Private Sub Command4_Click()
'menambahkan isi combo3 dengan nilai yang ada pada text1
Combo3.AddItem Text1.Text
'menambahkan isi list3 dengan nilai yang ada pada text1
List3.AddItem Text1.Text
End Sub
Private Sub Command3_Click()
'menghapus semua isian di combo2 dan list2
Combo3.Clear
List3.Clear
End Sub
Jalankan Form (atau tekan F5), isi textbox dengan huruf atau angka, nah… terus click command4, lihat hasilnya list dan combo sudah terisi dengan nilai-nilai yang ditulis dalam textbox. Wah gampang banget ya?
Untuk yang sudah terbiasa dengan Visual Basic 6.0 dan database, list dan combo bisa dipakai untuk menampilkan isi dari suatu database, yah hal itu di bahas dalam artikel mendatang saja ya