即効テクニック |
Recordsetオブジェクトでレコードを修正する場合は、EditメソッドとUpdateメソッドを使います。 サンプルプロシージャでは、「動物テーブル」のRecordsetオブジェクトを作成して、「動物名」フィールドの値を修正しています。 「動物名」フィールドの値が「ライオン」であった場合は、メッセージボックスに“ライオン(キケン!)”と表示されます。 Sub Sample() Dim rs As Recordset Set rs = CurrentDb.OpenRecordset("動物テーブル") rs.Edit rs!動物名 = rs!動物名 & "(キケン!)" rs.Update MsgBox rs!動物名 rs.Close End Sub DAOを使用するには、[ツール(T)]メニューの[参照設定(R)]をクリックすると表示される[参照設定]ダイアログボックスで、「Microsoft DAO 3.6 Object Library」をチェックします。