Cara Mudah Menampilkan Data Sql Server Dalam Data Grid View Vb.net

Subekti Nur Wahyudi 08 May Vb.Net Visual Studio

Bertemu lagi dengan topik tutorial vb.net, kali saya akan coba berbagi kepada temen-temen terkait cara Mudah Menampilkan Data Sql Server Dalam Data Grid View, jadi artikel kali ini kita menggunakan vb.net untuk bahasa pemrogramannya, dengan menggunakan visual studio dan sql server.

Kali ini kita akan membuat sebuah form berisi DataGridView yang nantinya akan dapat menampilkan data dari sebuah tabel database sql server.

Cara Mudah Menampilkan Data Sql Server Dalam Data Grid View

data grid view, tutorial vb.net, database sql server, view data sql server

1. Pertama kita siapkan beberapa komponen dalam Visual Studio kurang lebih yang dihasilkan seperti berikut:

Membuat Form Vb.Net

2. Pertama kita buat sebuah Form dengan komponen seperti berikut: (diantaranya ada Button Tampilkan, Dan DataGridView, karena Tujuan kita akan menampilkan data dari database Ke dalam DataGridView)

Kurang lebih seperti berikut:

Membuat Module Koneksi Vb.Net

3. Kemudian Terlebih Dahulu kita beri code pada Modulkoneksi guna terbentunya sebuah koneksi antara database dengan komponen Form yang telah dibuat.

Silahkan kurang lebih bisa lihat code di bawah ini:

Imports System.Data
Imports System.Data.Sql
Imports System.Data.SqlClient
Module Modulkoneksi
    Public comSQL As New SqlClient.SqlCommand
    Public sql As String
    Public conn As New SqlConnection
    Public str As String = "Data Source=LENOVO-PC\SQLEXPRESS;Initial Catalog=201553061;Integrated Security=True"

    Public Sub bukakoneksi()
        If conn.State = ConnectionState.Closed Then
            conn.ConnectionString = str


            Try
                conn.Open()
                MsgBox("Koneksi Berhasil")
            Catch ex As Exception
                MsgBox("Koneksi Gagal: " & ex.ToString)
            End Try
        End If
    End Sub

    Public Sub tutupkoneksi()
        If conn.State = ConnectionState.Open Then
            Try
                conn.Close()
            Catch ex As Exception
                MsgBox("Gagal menutup koneksi: " & ex.ToString)
            End Try
        End If
    End Sub
End Module

Catatan: Sesuaikan Data Source dengan pc kita dan Initial Catalog sesuai dengan nama database kita.

Code Menampilkan Data Vb.Net

4. selanjutnya sobat bisa memberi kode pada FormTampil dengan cara View Code/Click 2x pada FormTampil.

Selanjutnaya kita bisa Membuat Code Sub Private Tampil yang berfungsi sebagai Parameter yang bisa di panggil Untuk ditampilkan dalam DataGridView.

Berikut adalah Code Sub Private Tampilnya/fungsi tampil dalam form tersebut: Tampil()

Silahkan bisa temen-temen lihat di bawah ini:

Imports System.Data
Imports System.Data.Sql
Imports System.Data.SqlClient
Public Class Form1

    Private Sub tampil()
        bukakoneksi()
        sql = "SELECT *  From Penjualan"
        Dim da As New SqlDataAdapter(sql, conn)
        Dim ds As New DataSet
        da.Fill(ds)
        Dim dt As New DataTable

        For Each dt In ds.Tables
            DataGridView1.DataSource = dt
        Next
        tutupkoneksi()
    End Sub

    Private Sub btnTampil_Click(sender As Object, e As EventArgs) Handles btnTampil.Click
        tampil()
    End Sub

End Class

Catatan: Penjualan ( Merupakan Tabel dari database yang kita gunakan) dan tampil() merupakan pemanggilan fungsi tampil ketika Click Button Tampil.

Demikian penerapan DataGridView ketika form temen-temen jalankan:

Temen-temen Bisa Click Button Tampilkan dan akan muncul mesaggebox Koneksi Berhasil lalu Click OK.

Hasilnya seperti berikut:

Berikut tadi tutorial postingan kali ini mengenai bagaimana kita menampilkan data sql server pada data grid view vb.net. mudah-mudahan bisa membantu temen-temen yang sedang cari tutorial ini.

Terimakasih untuk kunjungannya, jangan lupa bagikan atau tinggalkan komentar di bawah postingan untuk kemajuan artikel di blog ini.