レコードセットデータの確認にはイミディエイトウインドウを使用します。
別に使用しなくても確認できる方法はあるのですがイミディエイトウインドウが
一番簡単に確認できる方法だと思います。
レコードセットデータ確認
Sub recordkakunin()
'レコードセットデータ確認
Dim db As Database
Dim rs As DAO.Recordset
Set db = CurrentDb
'T_会員テーブル全データの取得
Set rs = db.OpenRecordset("select * from T_会員", dbOpenDynaset)
Do Until rs.EOF
Debug.Print rs!会員No & rs!名前姓 & rs!名前名
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
db.Close
Set db = Nothing
End Sub
イミディエイトウインドウはVBEの表示メニューから開くことができます。
イミディエイトウインドウを開いて実行してみて下さい。
PR