前スレでかなりＤＱＮをかました957です。
あの後、
Set abc = cnn.Execute("select * from 必須項目 where 学生ID = " & rec1![学生ID])
abc.Delete
の２行に減らすところまで進めました。
ご親切に教えていただいてありがとうございました。
「現在のRecordsetは更新をサポートしていません。プロバイダか、選択したロックタイプの限界の可能性があります。」
とエラーが出てしまうのですが、
前スレにてロックタイプによるとありましたが、多分それのことなのでしょう。
これ以上ご迷惑は掛けられないので、自分で地道にやることにします。

最後に。
963にてDoloopを使用したソースを載せたのは、とりあえずはじめの状況を載せた方が良いのではと
考えたからです。
別に怒らせようとか思って載せたわけではありません。
ただ、そのことでレスをいただいた方々、本当にすみませんでした。