Coding Visual Basic .NET

Kumpulan Source Code Cara Cepat Belajar Aplikasi VB.net

Cara Menampilkan Data dari Database ke Datagridview pada VB.Net

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

Menurut saya Listview dan Datagridview pada VB.Net tampilannya bisa dikatakan hampir sama. Tetapi Programer-programer sering menggunakan Datagridview daripada menggunakan Listview. Pada artikel kali ini saya akan coba membagikan bagaimana Cara Menampilkan Data dari Database ke Datagridview pada VB.Net sehingga program bisa berjalan sesuai dengan keinginan kita.

cara menampilkan database ke datagridview pada vb.net  500x364 Menampilkan Data Ke Datagridview dari Database Membuat Datagridview Koneksi Mysql Database

Cara Menampilkan Data dari Database ke Datagridview pada VB.Net

Pertama kita buat databasenya jangan lupa dengan tabelnya. Baiklah langsung saja, untuk mengikuti Tutorial kali ini anda butuh terlebih dahulu Cara Membuat Modul Koneksi Mysql Database pada VB.Net, kalo agan” ingin membuat Cara Menampilkan Data dari Database ke Datagridview pada VB.Net. Mungkin coding yang ane kasih bisa bantu, langsung saja ane kasih listingnya :

Sub Tampilgrid()
Call cekkoneksi()
sqlAdapter = New MySqlDataAdapter(“select * from barang ” & paramCari, sConnection)
Ds = New DataSet
sqlAdapter.Fill(Ds, “barang”)
DGV.DataSource = Ds.Tables(“barang”)
DGV.ReadOnly = True

End Sub

Sub AturDgv()
Try

DGV.Columns(0).Width = 100
DGV.Columns(1).Width = 400
DGV.Columns(2).Width = 180
DGV.Columns(3).Width = 120
DGV.Columns(4).Width = 120
DGV.Columns(5).Width = 120
DGV.Columns(6).Width = 180

DGV.Columns(0).HeaderText = “Kode Barang”
DGV.Columns(1).HeaderText = “Nama Barang”
DGV.Columns(2).HeaderText = “Harga Jual”
DGV.Columns(3).HeaderText = “Diskon”
DGV.Columns(4).HeaderText = “Stock”
DGV.Columns(5).HeaderText = “Retur”
DGV.Columns(6).HeaderText = “Harga Beli”
Catch ex As Exception
End Try
End Sub

Private Sub FormUtama_Load(sender As Object, e As EventArgs) Handles MyBase.Load

Call cekkoneksi()
Call Tampilgrid()
Call AturDgv()

End Sub

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