ACCESS2010のVBAでフォーム内クエリのフィールド値を取得したい

フォーム内に表示しているクエリのレコードを選択し、
選択したレコードのフィールドの値を取得（変数に入れる）
するにはどうしたらよいか？

変数　=　Me.オブジェクトの名前.Form.CurrentRecord
とすると選択されたクエリ自体のレコード番号は取得できるのですが・・・

No.2 ベストアンサー 回答者： nicotinism 回答日時： 2015/04/16 22:41

私もコントロールを参照すれば・・・と思いますが、こんな風？

イミディエイトウィンドウに出力。
Private Sub コマンド21_Click()
Dim rs As DAO.Recordset
Dim i As Integer

Set rs = Me.Recordset
For i = 0 To rs.Fields.Count - 1
Debug.Print i, rs.Fields(i).Name, rs.Fields(i).Value
Next
Set rs = Nothing
End Sub

この回答へのお礼

ありがとうございます。rs.Fields(i)とするやり方がわからないのが原因でした。助かりました。

お礼日時：2015/04/24 18:21

No.1 回答者： ShowMeHow 回答日時： 2015/04/16 07:54

Me.コントロールの名前.value

もしくは
Me.コントロールの名前.text
などに入っていませんか？