→→→VB.NET ACCESS97との接続

Dim cCom As OleDbCommandBuilder
Dim dSet As DataSet = New DataSet()
Dim dAdp As OleDbDataAdapter
Dim ocn As OleDbConnection = New OleDbConnection()
ocn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;
                                  DataSource=D:\***.mdb;Persist Security Info=False"
dAdp = New OleDbDataAdapter("SELECT * FROM テーブル", ocn)
dAdp.Fill( dSet , "t" )

Dim i As Integer
For i = 0 To 999
   dSet.Tables("t").Rows(i)("列名")  = dSet.Tables("t").Rows(i)("列名") & " 様"
Next

cCom = New OleDbCommandBuilder(dAdp)
dAdp.Update( dSet , "t" )