Coding Visual Basic .NET

Kumpulan Source Code Cara Cepat Belajar Aplikasi VB.net

Cara Menampilkan Data dari Database ke ComboBox VB.Net

Halo Sobat Coding, Sekarang saya akan membahas mengenai bagaimana Cara Menampilkan Data dari Database ke ComboBox VB.Net. Kebetulan saya sedang mengerjakan Aplikasi Penjualan pada Toko dengan VB.Net. Sehingga sudah tentu, data-data yang tersedia berkaitan juga dengan barang-barang yang ada di Toko.

Pertama sebagai contoh kita buat database dengan 2 nama tabel yaitu nama Segmen_barang dan Barang. Tabel Segmen_barang adalah tabel yang nantinya akan ditampilkan pada ComboBox yang ada di fom Barang. Baiklah langsung saja, untuk mengikuti Tutorial kali ini anda butuh Koneksi terlebih dahulu, lalu mendesain Database dengan tabel-tabelnya seperti dibawah ini.

database barang penjualan toko Menampilkan Data ke ComboBox dari Database Database to ComboBox VB.Net

Database Barang Penjualan pada Toko

desain database segmen barang Menampilkan Data ke ComboBox dari Database Database to ComboBox VB.Net

Desain Database Segmen Barang

Setelah agan-agan selesai membuat desain database pada mysql lalu baru kita membuat skrip kodenya. Kalo agan” ingin membuat Cara Menampilkan Data dari Database ke ComboBox VB.Net. Mungkin coding yang ane kasih bisa bantu, langsung saja ane kasih listingnya :

Sub comboSegmen()
Try
sConnection.Open()
sqlCommand = New MySqlCommand(“select * from segmen_barang order by kd_segmen”, sConnection)
DR = sqlCommand.ExecuteReader()
While DR.Read()
cmbSegmen.Items.Add(DR(“nm_segmen”))

End While
Catch ex As Exception
MessageBox.Show(“Koneksi Gagal !!!, karena ” & ex.Message)
End Try

sConnection.Close()
End Sub

Private Sub cmbSegmen_SelectedIndexChanged(sender As Object, e As EventArgs) Handles cmbSegmen.SelectedIndexChanged
‘Setting_kode()
Dim sqlString As String = “SELECT setting_kode FROM segmen_barang WHERE nm_segmen=’” & cmbSegmen.Text & “‘ ”
cekkoneksi()

With sqlCommand
.CommandText = sqlString
.Connection = sConnection
End With

DR = sqlCommand.ExecuteReader
While DR.Read()
txtSetting.Text = DR(“setting_kode”)
End While
DR.Close()
End Sub

Public Sub Barang_Load(sender As Object, e As EventArgs) Handles MyBase.Load

comboSegmen()

End Sub

Nanti kurang lebih jadinya akan seperti ini gan…

cara menampilkan data dari database ke comboBox VB.Net  500x320 Menampilkan Data ke ComboBox dari Database Database to ComboBox VB.Net

Cara Menampilkan Data dari Database ke ComboBox VB.Net

Tulisan Lainnya :

JUAL DVD KUMPULAN PROGRAM APLIKASI DAN SOURCE CODE VB.NET

Leave a Reply

Your email address will not be published. Required fields are marked *

You may use these HTML tags and attributes: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <strike> <strong>

Coding Visual Basic .NET © 2014 Frontier Theme