Imports System.Data.OleDb
Public Class Form2

    Dim con As New OleDbConnection
    Dim str As New System.Text.StringBuilder
    Dim cmd As New OleDbCommand
    Dim CB As New OleDbCommandBuilder
    Dim da As OleDbDataAdapter
    Dim dt As New DataTable
    Private Sub Form2_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        str.Append("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=")
        str.Append(AppDomain.CurrentDomain.BaseDirectory)
        str.Append("yogita.mdb")
        str.Append(";Persist Security Info=False")
        con.ConnectionString = str.ToString
        cmd.CommandType = CommandType.Text
        cmd.CommandText = "select * from studentDetails "
        cmd.Connection = con
        da = New OleDbDataAdapter(cmd)
        da.Fill(dt)
        CB = New OleDbCommandBuilder(da)
        DataGridView1.DataSource = dt

    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        dt.GetChanges()
        da.Update(dt)
        Msgbox("Records updated in database.")
    End Sub
End Class

<img src="c:\one.jpg"gt;