Koneksi Database Access (mdb) Dengan VB .Net

Visual Basic .Net

Selamat datang di Blog DUNIA-VB, blog yang membahas secara khusus tutorial Visual Basic 6.0 dan Visual Basic .Net.

Dibawah ini akan kami bahas tentang Cara Membuat Koneksi Database Access (mdb) dengan VB .Net. Kami menggunakan VB .Net 2005. Berikut langkahnya :

Buatlah Database dengan nama : DBDUNIAVB.mdb
Buatlah Tabel dengan nama : TBL_ANGGOTA
Design TBL_ANGGOTA adalah seperti gambar dibawah ini :

Selanjutnya kita akan membuat form VB .Net
Buka aplikasi VB .Net anda
Buatlah Form Seperti gambar dibawah ini :

Form diatas hanya ditambahkan DatagridView
Masukan DBDUNIAVB.mdb pada folder Bin/Debug

kemudian masukan koding dibawah ini pada Form1 :

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=DBDUNIAVB.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 TBL_ANGGOTA", Conn)
        ds = New DataSet
        ds.Clear()
        da.Fill(ds, "TBL_ANGGOTA")
        DataGridView1.DataSource = (ds.Tables("TBL_ANGGOTA"))
    End Sub
End Class

Berikut hasilnya :

Jika koneksi database sudah bisa, maka anda bisa melanjutkan dengan Input, Edit, Delete VB .Net dengan database Access

Salam
DUNIA-VB

Bagikan

Jangan lewatkan

Koneksi Database Access (mdb) Dengan VB .Net

4/ 5

Oleh Vainit

Vainit 9:42 AM Komentar