外部サイトのURLをクリックしました。
URLを確認し問題がなければクリックしてください。

https://docs.microsoft.com/ja-jp/office/vba/access/concepts/data-access-objects/return-a-random-record-from-a-dao-recordset