Cara menampilkan data dari database ke combobox vb 2010

Cara Menampilkan Data Dari Database Ke Textbox Vb Net Dari Combobox – Halo teman-teman, artikel ini merupakan lanjutan dari portingan artikel saya sebelumnya tentang menampilkan data dari database ke Textbox Vb Net dari ListView (baca disini). Pada artikel ini saya berikan tips bagaimana cara menampilkan data dari database ke Textbox Vb Net dari Combobox.

Berikut tahap – tahap yang dilakukan untuk menampilkan data dari database ke Textbox Vb Net dari Combobox :

1. Yang pertama buat desain program vb net seperti yang telihat pada gambar berikut ini

Imports MySql.Data.MySqlClient
Public Class Form1

    Public DB As  New MySql.Data. MySqlClient. MySqlConnection
    Public DR As  MySqlDataReader
    Public MSD As  MySqlCommand
    Public SQL As String
    Public DS As DataSet
    Public MDA As  MySqlDataAdapter

    Sub ShowDB()
        SQL = "Server=Localhost; uid=root ;database= database_siswa"
        Try
            DB.ConnectionString  = SQL
            DB.Open()
        Catch ex As Exception
            MsgBox (ex.Message )
        End Try
    End Sub

CMBnoinduk.Focus()
SQL = "select * from  Tabel_Data_Siswa"
MSD = New  MySqlCommand(SQL, DB )
DR = MSD. ExecuteReader
While DR.Read
     CMBnoinduk. Items.Add(DR ( "NoIndukSiswa" ))
End While
DR.Close()

SQL = " select * from  Tabel_Data_Siswa  where  NoIndukSiswa = '" & CMBnoinduk. Text & "'"

MSD = New  MySqlCommand(SQL,DB )
DR = MSD. ExecuteReader

DR.Read()
CMBnoinduk.Text  =  DR( "NoIndukSiswa")
TXBnama.Text =  DR ("Nama" )
TXBjurusan.Text  = DR("Jurusan")
TXBkelas.Text =  DR("Kelas")
DR.Close()