Mengisi ComboBox Dengan Data dari Tabel di Database

Postingan kali ini yaitu cara mengisi value dari Combobox yang value-nya berasal dari database. Pertama-tama tentu menyiapkan tabelnya di SQL Server, sebagai contoh saya menggunakan database testing dan tabel bernama tbl_obat. Berikut penampakannya.

Untuk SQL Code dapat didownload di akhir postingan. Sekarang buat project baru di VB.Net 2008 dan buat form seperti berikut ini.

Secara sederhana, berikut adalah kode mengisi ComboBox dengan data dari Database.

   Dim query As String = "SELECT * FROM tbl_obat"  
   Dim DA = New SqlDataAdapter(query, koneksi)  
   Dim DS = New DataSet  
   DA.Fill(DS, "tbl_obat")  
   With ComboBox1  
     .DataSource = DS.Tables("tbl_obat")  
     .DisplayMember = "obat"  
     .ValueMember = "id"  
     .SelectedIndex = 0  
   End With  

Untuk contoh Source Code Program beserta SQL Code dapat didownload Disini.

Jangan lupa untuk mengganti nama server SQL Servernya dengan nama server SQL Server di komputer / laptop anda.

Baca juga di blog ini :
Anda ingin dapat uang dengan hanya menjawab survey..?