Membuat Combobox dengan 3 kolom

Saya ingin memperlihatkan cara membuat combobox dengan 3 kolom dengan menggunakan VB.net dan Komponen Devexpress. Combobox yang akan kita buat memiliki 3 kolom. Kolom 1 berisi nama propinsi, kolom 2 berisi ibukotanya dan kolom 3 berisi jumlah populasi penduduk. Ketika combobox dipilih, textbox yang dibawahnya akan terisi nilai jumlah populasi.
Tools yang dibutuhkan:

1. Microsoft Visual Studio 2010
2. Komponen Devexpress. Cek di http://www.devexpress.com/

 Pertama kali kita buat project baru dengan tipe Windows Form Application.

Kemudian kita akan membuat database dengan struktur sebagai berikut:

Nama Kolom	Tipe Data
NamaPropinsi	string
IbuKota	string
JumlahPopulasi	big int

Pada bagian kanan, pilih Solution Explorer kemudian klik kanan WindowsApplication1 > Add > New Item

Kemudian pilih komponen Local Database. Jadi nanti data-data propinsi akan kita masukkan ke dalam database lokal ini. Fungsinya mirip dengan MS Access tapi Local Database sangat mirip dengan MS SQL Server. Jadi syntax yang dipakai juga mirip.

Pilih Dataset dan klik Next

Terakhir klik Finish

Terlihat Database1.sdf sudah terbentuk di Solution Explorer. Klik dua kali berkas tersebut. Coba lihat di sebelah kiri!. Akan terbuka panel baru yakni Server Explorer. Klik kanan pada Table dan pilih Create Table.

Akan terbentuk tabel Propinsi. Isikan data berikut ini ke dalam tabel tersebut. Klik kanan pada tabel Propinsi > Show Table Data

NamaPropinsi	IbuKota	JumlahPopulasi
Aceh	Banda Aceh	223446
Sumatera Utara	Medan	2097610
Sumatera Barat	Padang	833562
Riau	Pekanbaru	897767

Pilih komponen LookUpEdit di panel Toolbox sebelah kiri. Komponen ini terletak di bagian Devexpress Common Controls. Pindahkan ke Form1.

Langkah selanjutnya adalah memasukkan tabel Propinsi ke dalam Dataset. Klik dua kali Database1DataSet.xsd di Solution Explorer. Tarik tabel Propinsi dari Server Explorer disebelah kiri ke dalam Dataset.
Untuk memastikan bahwa data yang kita masukkan sudah tersedia. Klik kanan pada Fill, GetData() > Preview Data > Preview. Pastikan data yang telah dimasukkan tampil.

Sekarang saatnya untuk menghubungkan Database1Dataset dengan komponen LookUpEdit1. Caranya klik kanan LookUpEdit1 kemudian isi Data Source dengan tabel Propinsi yang ada dalam Database1Dataset.
Display Member diisi dengan NamaPropinsi. Display Member ini berguna untuk menampilkan data di combobox ketika belum diklik. Terakhir isi Value Member dengan JumlahPopulasi. Kita ingin ketika combobox dipilih, nilai yang dihasilkan adalah JumlahPopulasi. Jika aplikasi dijalankan akan terlihat seperti gambar berikut ini:

Tambahkan komponen TextEdit ke Form1. Komponen ini mirip dengan TextBox bawaan .NET. TextEdit1 akan menampung nilai JumlahPopulasi dari LookUpEdit1. Ketika LookUpEdit1 dipilih otomatis TextEdit1 berisi nilai yang dimaksud.
Tambahkan Events EditValueChanged di komponen LookUpEdit1. Tambahkan kode

1	TextEdit1.Text = LookUpEdit1.EditValue

Sehingga kode keseluruhan untuk Events ini seperti berikut:

1 2 3

Private Sub LookUpEdit1_EditValueChanged(sender As System.Object, e As System.EventArgs) Handles LookUpEdit1.EditValueChanged     TextEdit1.Text = LookUpEdit1.EditValue End Sub

Coba jalankan aplikasinya.

Demikian tutorial ini. Mohon masukkannya. Lebih dan kurang mohon dimaafkan. Terima Kasih.