Cara koneksi database SQL SERVER di Visual Studio 2013

Disini saya akan menjelaskan bagaimana cara koneksi database SQL Server 2013 ke Visual Studio 2013 atau VBNet .

SQL Server adalah DBMS dari Microsoft dan memiliki kelebihan mampu menyambungkan database ke beberapa PC secara online .

Disini saya menggunakan database toko : 

Langkah-langkah : 

1. Buat Module baru di VS 2013 dengan cara menu Project - Add Module
2. Tambah Kode Seperti berikut :

Imports System.Data.Sql
Imports System.Data.SqlClient

Module Module1

    Public koneksi As SqlConnection
    Public data As DataSet
    Public baca As SqlDataReader
    Public adaptor As SqlDataAdapter
    Public cmd As SqlCommand
    Public ass As DataTable
    Public sql As String
    Public Sub buka()
        sql = "Data Source=PC-199\SQLEXPRESS;Initial Catalog=toko;Integrated Security=True"
        koneksi = New SqlConnection(sql)
        Try
            If koneksi.State = ConnectionState.Closed Then
                koneksi.Open()
            End If
        Catch ex As Exception
            MsgBox(Err.Description, MsgBoxStyle.Critical, "Error")
        End Try
    End Sub


End Module

Ganti Data Source yang saya hitamkan tadi sesuai dengan nama koneksi SQLSERVER anda 3. Lalu buatlah form baru dengan tampilan sebagai berikut :

4. Lalu klik 2x pada form , atau bisa menggunakan menu View-Code lalu set code sebagai berikut : 

 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Call buka()
        Call tampil()
    End Sub

    Sub tampil()
        koneksi.Close()
        buka()
        cmd = New SqlClient.SqlCommand("SELECT * FROM tbl_barang", koneksi)
        adaptor = New SqlClient.SqlDataAdapter
        adaptor.SelectCommand = cmd
        data = New Data.DataSet
        adaptor.Fill(data, "c")
        DGV.DataSource = data
        DGV.DataMember = "c"
        atur()

    End Sub

5. Save dan Jalankan , nanti akan tampil tampilan sebagai berikut :