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