Access コントロール名に変数組合せ

ex.
対象となるコントロールがtest1からtest10まであるとして、
その値の取得とか。

Dim i as Long
Dim a as Variant

For i = 1 to 10
a = Me("test" & Trim(Str(i)))
Next

みたいな。