Menampilkan data yang ada pada database di combobox VB6

Selesai dengan coding Insert, Update, Delete data di VB6, kali ini saya akan berbagi cara mengenai menampilkan data pada combobox…

Pernah lihat form yang kaya gini ?

Bisa dilihat disana ada sebuah Combobox yang berisikan data. ada dua cara untuk menampilkan data pada Combobox.

1. Dengan mengisi manual List pada Properties
2. Mengambil data dari database

Nah, kali ini saya akan membagikan cara untuk menampilkan data KODE BARANG dan Nama Barang Sekaligus. Data itu berasal dari tutorial sebelumnya yaitu Insert, Update dan hapus data… masih menggunakan database yang sama pada tutorial Menampilkan data pada datagrid vb6. 🙂

1. Tambahkan Sebuah Combobox kedalam form – Secara default name dari combobox itu adalah “Combobox1”

2. Ketikkan Script berikut ini pada event Form_load

Call BukaDB
RSBarang.Open "select * from barang", Conn
Combo1.Clear
Do While Not RSBarang.EOF
    Combo1.AddItem RSBarang!Kodebrg & Space(5) & RSBarang!NamaBrg
    RSBarang.MoveNext
Loop

Jika telah selesai mengikuti tutorial diatas, Coba Running / Jalankan Program, Munculkah dia ?? 🙂