Tutorial VB6 : Cara Menampilkan Data Dari Database di Combobox
Resplandor sobat sourcecodeaplikasi, kembali bertemu di blog sederhana ini, apa kabar semuanya ? semoga semuanya pada keadaan sehat dan tetap semangat belajar programmingnya. Oh iya di artikel ini kami akan share panduan seputar vb6, masih terkait postingan kami sebelumnya yaitu Insert, Update, Delete data di VB6, kali ini saya akan berbagi cara mengenai menampilkan data di combobox.
Pernahkah dikala menjalankan program vb6, sobat melihat form yang seperti di bawah ini ?
Dapat dilihat disana ada sebuah Combobox yang berisikan data. Nah di artikel ini kita akan bahas sedikit mengenai cara merancang menampilkan data pada combobox itu, ada dua cara bagi menampilkan data di Combobox.
- Dengan mengisi manual List di Properties
- Mengambil data dari database
Nah, kali ini saya akan membagikan cara bagi menampilkan data KODE BARANG dan Nama Barang Sekaligus. Data itu berasal dari panduan sebelumnya yaitu Insert, Update dan hapus data… masih menggunakan database yang sama di panduan Menampilkan data di datagrid vb6.
1. Tambahkan Sebuah Combobox kedalam form – Secara default name dari combobox itu yaitu “Combobox1”
2. Ketikkan Script berikut ini di event Form_load
1 2 3 4 5 6 |
RSBarang.Open "select * from barang", Conn Combo1.Clear Do While Not RSBarang.EOF Combo1.AddItem RSBarang!Kodebrg & Space(5) & RSBarang!NamaBrg RSBarang.MoveNext Loop |
Sekiranya telah selesai mengikuti panduan diatas, Coba Running / Jalankan Program, semoga berhasil ya sobat.