Tuesday, April 7, 2015

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

No comments:

Post a Comment