Design the windows application that will display the content of table in MS Access database on DataGrid control using data adapter in VB.net



User Interface













Code:
Imports System.Data.SqlClient
Public Class Form1



    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim c As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\admin\Documents\Database2.accdb"
        Dim s As String = "SELECT * FROM info"
        Dim OleDBConn1 As System.Data.OleDb.OleDbConnection = New System.Data.OleDb.OleDbConnection(c)
        Dim d As New DataSet()
        Dim OleDBDataAdapter1 As System.Data.OleDb.OleDbDataAdapter = New System.Data.OleDb.OleDbDataAdapter(s, OleDBConn1)
        OleDBConn1.Open()
        OleDBDataAdapter1.Fill(d, "info")
        DataGridView1.DataSource = d.Tables("Info")
        OleDBConn1.Close()
    End Sub
End Class

O/P:

Comments