2016-12-01 7 views
0

私のアクセス2016レポートでは、txt1からtxt10という名前の10個のコントロールがあり、テーブルのレコードからそれらのデータを取り込みたいとします。自分のカウンタに基づいてループのコントロール名をインクリメントする方法はありますか?アクセス2016 VBA:式でコントロール名を使用するにはどうすればよいですか?

このようなものです。明らかにMe.txt(カウンター)は配列ではなく、私がしたいことに対して私が与えることができる最も良い表現です。

Dim db As DAO.Database 
Dim rs As DAO.Recordset 
Dim counter as integer 

Set db=CurrentDatabase 
Set rs=db.OpenRecordSet("SELECT * FROM table WHERE variable = " & something) 

If Not rs.EOF Then 
    rs.MoveFirst 
    counter = 1 
    Do Until rs.EOF 
     Me.txt(counter) = rs.Fields("field1") 
     counter = counter + 1 
     rs.MoveNext 
    Loop 
End If 

ありがとう!次

答えて

0

用途:働い

Me("txt" & counter) = rs.Fields("field1") 
+0

。ありがとう。 – Albion

関連する問題