Belajar Vb.Net : Menampilkan Multiple Columns ComboBox Database MySQL

Tutorial Vb.Net khusus pemula - bagaimana cara menampilkan data lebih dari satu kedalam sebuah combobox menggunakan database MySQL dengan bahasa pemrogramman vb.net? tutorial kali ini kita akan membuat aplikasi sederhana dengan menggunakan combobox di visual studio 2015. biasanya dalam tutorial vb.net yang sudah dibahas di scqq dengan menampilkan data di combobox dari database dan vukan menggunakan multi data. simak tutorialnya.

Langsung saja, buat poject baru dan beri nama "MultiDataComboBox", buatlah form baru dan beri nama "FrmUtama.vb" atau dengan nama lain sesuai kebutuhan, serta desain tampilan form1.vb sesuai gambar berikut :

Jika sudah selesai, lanjut dengan membuat koneksi ke database MySQL, bagaimana cara membuat koneksi MySQL dengan ODBC? buatlah Module baru dan beri nama ModuleKoneksi.vb, serta tuliskan seluruh code berikut :

Source Code ModuleKoneksi.vb

Imports System.Data.Odbc

Module moduleKoneksi

    Public koneksi As OdbcConnection

    Sub openConnection()
        Try
        ' create our connection using ODBC Driver
            koneksi = New OdbcConnection("DSN=k13new;MultipleActiveResultSets=True")
            If koneksi.State = ConnectionState.Closed Then
            ' open the connection
                koneksi.Open()
            End If
        Catch ex As Exception
        ' if connections failed
            MsgBox("konek Kedatabase Bermasalah")
        End Try

    End Sub

End Module

Code diatas berfungsi untuk membuat koneksi ke database MySQL
Selanjutnya kembali ke Form1.vb dan klik dua kali pada form1,
Import system ODBC pada form1

Imports System.Data.Odbc

Pada Form_load tuliskan code berikut :

Source Code MultiColumns ComboBox

    Private Sub multicombo_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim cmd As OdbcCommand
        Dim da As OdbcDataAdapter
        Dim ds As DataSet
        openConnection() ' open connections

        cmd = New OdbcCommand("select * from biodata", koneksi) ' query to our database
        da = New OdbcDataAdapter(cmd)
        ds = New DataSet
        da.Fill(ds)
        
        ' show data to our combo with multi columns

        For i As Integer = 0 To ds.Tables(0).Rows.Count
            ComboBox1.Items.Add(ds.Tables(0).Rows(i)(0) & " | " & ds.Tables(0).Rows(i)(1) & " | " & ds.Tables(0).Rows(i)(5))
            i = i + 1
        Next
    End Sub

Berfungsi untuk menampilkan data lebih dari satu kolom dari database ke combobox vb.net.

Jika masih kurang paham dengan tutorial diatas, silahkan simak video tutorial Menampilkan Multiple Columns ComboBox Database MySQL berikut :

Jangan Lupa share dan subscribe jika tutorial ini bermanfaat :
Google Plus : https://plus.google.com/u/0/+HarisonMatondang
Youtube : http://www.youtube.com/c/HarisonMatondang
Website : Tutorial Vb.Net Khusus Pemula

Terima Kasih