データベースのテーブルからレコードを削除するにはDeleteメソッドを使用します。
レコードセット変数.Delete
Deleteメソッドを使用する場合、Openメソッドでレコードセットを作成する際に引数としてadLockOptimisticを指定して更新用にレコードセットを作成する必要があります。
以下の例では名簿テーブルよりOpenメソッドにより更新用にレコードセットを作成して、Deleteメソッドにより新規にレコードを作成し姓が"武田"であるレコードを削除し、Closeメソッドで閉じています。
Sub Sample()
Dim rs As New ADODB.Recordset
rs.Open "名簿", CurrentProject.Connection,,adLockOptimistic
rs.Find "姓='武田'", adSearchForward
Do While rs!姓 = "武田"
rs.Delete
rs.MoveNext
Loop
rs.Close
End Sub
ADOとは | レコードセットの作成(Open) | レコードセットの読み取り(Move) | レコードの検索(Find) | レコードの更新(Update) | レコードの追加(AddNew) | レコードの削除 | レコードの抽出(Filter) | レコードの並び替え(Sort) | SQL文の実行