ACCESSで連番になったオブジェクトの取得について

フォーム上に[日付1]～[日付31]のテキストボックスがあり、その文字色をVBAで変えたいのですが、For文もしくはLoopを使用して完結に書く方法はありますか？

No.1 ベストアンサー 回答者： 16August 回答日時： 2006/01/26 17:29

色を最初にfcolor()読み込んでおいて、

for x = 1 to 31
me.controls("日付" & x).forecolor = fcolor(x)
next x
for　でも　next でも大丈夫です。