[العيدروس]

مشكور اخي sendbad100 و بارك الله فيك على الارشاد
انا واضع قاعدة البيانات في  مع البرنامج Bin/Debug
هذا كود الاتصال بالقاعدة بالموديل :

كود :

   Public Sub dbase_conn()
       If con.State = ConnectionState.Open Then con.Close()
       Try
           con = New OleDbConnection("provider=Microsoft.Ace.OLEDB.12.0;Data Source=MAXDATABASE.accdb")
           con.Open()
       Catch ex As Exception
           MessageBox.Show(ex.Message, "لم يتم الربط مع قاعدة البيانات", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1, MessageBoxOptions.DefaultDesktopOnly)
           con.Close()
           End
       End Try
   End Sub

بالفورم لود بالفورم يلي يتم فيه الحفظ :

كود :

   dbase_conn()
       InfoCommand = New OleDbCommand("SELECT * FROM Information ORDER BY NName", con)
       InfoAdapter = New OleDbDataAdapter()
       InfoAdapter.SelectCommand = InfoCommand
       InfoTable = New DataTable()
       InfoAdapter.Fill(InfoTable)
       DataGridView1.DataSource = InfoTable        '--------------------------'
       TextBox1.DataBindings.Add("Text", InfoTable, "ID")
       TextBox2.DataBindings.Add("Text", InfoTable, "FirstName")
       TextBox3.DataBindings.Add("Text", InfoTable, "LastName")

بالتصيحات بنفس الفورم

PHP كود :

Imports System.Data
Imports System.Data.OleDb
Public Class Form1
    Dim InfoConnection As OleDbConnection
    Dim InfoCommand As OleDbCommand
    Dim InfoAdapter As OleDbDataAdapter
    Dim InfoTable As DataTable
    Dim InfoManager As CurrencyManager
    Dim InfoState As String
    Dim InfoBookmark As Integer 


املي بالله ثم بكم النظر بالموضوع هذا الامر حيرني كثير كثير
بارك الله فيكم