Visual Basic.Net Menampilkan data ke DatagGridView

Selamat datang di bahasaprogramvb.blogspot.com, Kali ini  admin akan membuat cara menampilkan data dari database ke dalam datagridview, untuk kasus ini diharapkan aplikasi sudah terkoneksi dengan database sql server,

Ikuti langkah-langkah dibawah ini :

1.       Membuat tabel mwilayah seperti dibawah ini

 2.       Membuat form seperti di bawah ini

Ø  Tambahkan 1 buah DataGridView

Ø  Tambahkan 1 Buah Button dengan ID btnTampil

3.  Masukkan kode di bawah ini

Imports System.Data.SqlClient

Imports System.Data

Public Class Form1

    Dim msql As String

    Dim mconn As SqlConnection

    Dim da As SqlDataAdapter

    Dim dt As DataTable

    Dim cmd As SqlCommand

    Sub Openconnection()

        Try

msql = "DATA SOURCE=DANGEROUS-PC; INITIAL CATALOG=CMD; USER  ID=SA; PASSWORD=12345;"

            mconn = New SqlConnection(msql)

            mconn.Open()

        Catch ex As Exception

            MessageBox.Show(ex.Message)

        End Try

    End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Call Openconnection()

    End Sub

Private Sub BtnTampilData_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnTampilData.Click

        On Error Resume Next

        DataGridView1.Rows.Clear()

        msql = "select * from mwilayah"

        cmd = New SqlCommand(msql, mconn)

        da = New SqlDataAdapter(cmd)

        dt = New DataTable

        da.Fill(dt)

        DataGridView1.DataSource = dt

    End Sub

End Class