→→→テーブルのレコードを更新する

Dim oCom As OleDb.OleDbCommand
Dim oCn As OleDb.OleDbConnection = New OleDb.OleDbConnection
oCn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
                                 "D:\***.mdb;Persist Security Info = False"
oCn.Open()
oCom = New OleDb.OleDbCommand("UPDATE テスト SET 製品名='プラズマ' WHERE コード=5",oCn)

Try
    oCom.ExecuteNonQuery()
Catch ex As Exception
    MessageBox.Show( ex.Message,"エラー")
End Try
oCn.Close()