Cara Koneksi Database Access 2007 Dengan VB .Net 2012

Pada pembelajaran VB Net 2012 kali ini akan dibahas mengenai Cara Koneksi Database Access 2007 Dengan VB .Net 2012. Bagi anda yang mempunyai Microsoft Access versi 2010 atau 2013 juga bisa mengikuti tutorial dibawah ini. karena pada access 2007 extensionnya sama dengan Access 2010 atau 2013 yaitu .accdb

Berikut langkah-langkahnya :
#1. Buatlah Database dan Tabel menggunakan Access 2007 / 2010 / 2013 (accdb)
Buatlah nama database dengan nama : DBBelajarvb.accdb
Buatlah Tabel dengan nama : Barang
Design dan masukan sample data pada Tabel Barang seperti gambar dibawah ini :

Setelah selesai membuat Database dan Tabel seperti gambar diatas, ikuti langkah 2

#2. Buat Project Dengan VB Net 2012 dan Buatlah Design pada Form1
Design Form1 seperti gambar dibawah ini :

Pada gambar diatas, hanya ditambahkan DatagridView1
Kemudian masukan koding dibawah ini :

Imports System.Data.OleDb

Public Class Form1

    Dim Conn As OleDbConnection

    Dim da As OleDbDataAdapter

    Dim ds As DataSet

    Dim LokasiDB As String

    Sub Koneksi()

        LokasiDB = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=DBBelajarvb.accdb"

        Conn = New OleDbConnection(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

        Koneksi()

        da = New OleDbDataAdapter("Select * from barang", Conn)

        ds = New DataSet

        ds.Clear()

        da.Fill(ds, "Barang")

        DataGridView1.DataSource = (ds.Tables("Barang"))

    End Sub

End Class

Jangan lupa untuk memasukan DBBelajarvb.mdb pada Folder Bin\Debug Project Aplikasi VB Net anda

Jalankan Project anda, dan hasilnya adalah seperti gambar dibawah ini :

Bagaimana cukup mudah bukan.. ikuti terus pembelajaran VB Net 2012 lainnya ya....