VB .NET - Cara Koneksi Database Access (.mdb)

NO.1 Membuat Project Baru VB 2010 dan Menyimpannya
Pastikan anda sudah Install Visual Basic 2010 pada komputer anda,
Klik Start pada Windows
All Programs

Klik Microsoft Visual Basic 2010 Express
Klik File - New - Project
Maka akan muncul :

Klik OK

Maka akan keluar Form1 (lihat gambar diatas)

NO.2 - Membuat Database Access 2003 , Tabel Barang dan menyimpannya pada Bin / Debug
Buatlah sebuah database dengan nama : DBJNM.mdb
Buatlah sebuah Tabel dengan Nama : Barang
Silahkan Design Tabel Barang dan Isi Tabel Barang tersebut sesuai gambar dibawah ini :

Setelah selesai, simpan pada folder Bin / Debug

NO.3  Design Form, Masukan Koding dan Jalankan Program
Buatlah sebuah Form seperti gambar dibawah

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.jet.oledb.4.0;data source=DBJNM.mdb"
        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

Jika sudah semua, silahkan run atau jalankan Proect VB .Net anda
Hasilnya adalah seperti gambar dibawah ini :

Silahkan KLIK DISINI Untuk mendownload Tutorial diatas
Semoga bermanfaat, ikuti terus pembelajaran dari kami :)