Koneksi Database SQL Server VB .Net 2008

Cara Koneksi Database SQL Server Dengan VB .Net 2008
Untuk mengikuti Pembelajaran ini Pastikan :

1. Anda Sudah Install SQL Server (Kami menggunakan SQL Server 2005 Express)
2. Anda Sudah Install Visual Basic 2008

Berikut langkahnya :
(1) Buat Database dan Tabel Pada SQL SERVER
Buatlah Database Dengan Nama : DBBELAJARVB
Buatlah Tabel Dengan Nama : Barang
Jika anda belum tahu cara membuat Database dan Tabel Menggunakan SQL SERVER anda bisa melihat caranya dengan KLIK LINK INI

Setelah selesai, berikut tampilan Database SQL SERVER

(2) Buatlah Design Form Seperti gambar dibawah :

Design form diatas hanya ditambahkan DataGridView1

(3) Berikut Kodingnya :

Imports System.Data.SqlClient
Public Class Form1
    Dim Conn As SqlConnection
    Dim da As SqlDataAdapter
    Dim ds As DataSet
    Dim LokasiDB As String
    Sub Koneksi1()
        LokasiDB = "data source=TMedia-PC\sqlexpress;initial catalog=DBBELAJARVB;integrated security =true"
        Conn = New SqlConnection(LokasiDB)
        If Conn.State = ConnectionState.Closed Then Conn.Open()
    End Sub
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Koneksi1()
        da = New SqlDataAdapter("Select * from barang", Conn)
        ds = New DataSet
        ds.Clear()
        da.Fill(ds, "Barang")
        DataGridView1.DataSource = (ds.Tables("Barang"))
    End Sub
End Class

Note : Untuk Koding yang kami beri warna kuning, silahkan sesuaikan dengan Komputer anda

Salam
BelajarVB.com