Test Koneksi Database VB 2008

Pada Tutorial Visual Basic 2008 kali ini adalah lanjutan dari Tutorial sebelumnya, jika anda lihat gambar diatas adalah Gambar Tutorial terakhir dimana kita telah membuat Module Koneksi database Access 2010 dengan VB 2008. Kemudian akan kita lanjutkan untuk mengetes koneksi yang telah kita buat dengan Module tersebut.

Berikut langkah-langkahnya :
Pastikan anda sudah membuat database DBPintarvb.accdb dan database tersebut anda masukan pada folder latihan VB 2008 anda pada folder bin/debug

Buatlah Form baru (Klik Project - Add Windows Form)

Buatlah nama Form contoh : FormTesKoneksi.vb

Kemudian Klik Add
Buatlah Design Form seperti gambar dibawah ini :

Form diatas hanya ditambahkan DataGridview
Masukan Koding pada FormTestKoneksi :

Imports System.Data.OleDb
Public Class FormTestKoneksi
    Private Sub FormTestKoneksi_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
        Da.Fill(Ds, "Barang")
        DataGridView1.DataSource = Ds.Tables("Barang")
        DataGridView1.ReadOnly = True
    End Sub
End Class

Ganti Pengaturan StartUp Form Jika di Run :

Kemudian anda bisa Run Aplikasi, Jika koneksi sudah benar maka akan muncul :

Tutorial Test Koneksi selesai, Mari ikuti Tutorial Visual Basic 2008 kami selanjutnya :)

Lihat Juga Panduan Pemrograman Konputer