スレ立てるまでもない質問はここで 163匹目

ACCESSのVBAで、下記のようなことってできないでしょうか？
アドバイス等頂けないでしょうか。。。

<やりたいこと>
下記コードにおいて、rs1で抽出したものの中から、さらに抽出してrs2に入れたいです。
https://i.imgur.com/S1mtPeL.png

<VBAコード(画像内と同じ)>
Sub test()
Dim db As Database
Dim rs1 As Recordset
Dim rs2 As Recordset

Set db = CurrentDb

Set rs1 = CurrentDb.OpenRecordset("SELECT * FROM [Tテーブル] WHERE [フィールド1] = 'A1'", dbOpenDynaset)
Set rs2 = CurrentDb.OpenRecordset("SELECT * FROM rs1 WHERE [フィールド2] = 'B1'", dbOpenDynaset)

Debug.Print rs2("フィールド2") & rs2("フィールド3")
End Sub