koneksi vb 2010 dengan sql server 2008 r2

Ane mau bagiin buat rekan - rekan sekalian tentang cara mengkoneksikan vb 2010 dengan sql server 2008 r2 dan cara menampilkan database yang berada di sql server 2008 r2 ke datagridview......moga - moga untuk agan" yang masih baru tulisan ne bermanfaat n untuk agan" yang sudah mahir di vb 2010 n sql server 2008 r2 ,,, mohon di koreksi yooooo .... ane juga lagi proses belajar ... hheeeu

berikut sintaksnya

Imports System.Data

Imports System.Data.SqlClient

Public Class Form1

    Dim koneksi As SqlConnection

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

        Dim strkoneksi As String

        strkoneksi = "Data source=DAGOENG-24\SQLEXPRESS;Initial Catalog=db_mhs;Integrated Security = True"

        koneksi = New SqlConnection (strkoneksi )

        Try

            koneksi.Open()

        Catch ex As Exception

            MsgBox(ex.Message)

        End Try

       

    End Sub

Tampilan awal (belum di run )

double klik di button tampill

    Private Sub btn_tampil_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_tampil.Click

        Dim da As SqlDataAdapter

        Dim ds As DataSet

        Try

            da = New SqlDataAdapter("select*from dbo.mhs", koneksi)

            ds = New DataSet

            da.Fill(ds, "dbo.mhs")

            DataGridView1.DataSource = ds.Tables(0)

        Catch ex As Exception

            MsgBox(ex.Message)

        End Try

    End Sub

End Class

Tampilan setelah di run

untuk membuat database di sql server 2008 r2 silahkan di liahat di judul sql server milik ku.. hheeeeu

sekian.. terima kasih ^__^