استفاده از یک متغیر در کنار حرف کلیدی Me

[qhoqnose]

سلام دوستان
برای بنده حالتی پیش اومده که بجای استفاده از نام یکسری فیلد تو میحط VBA باید از یک متغیر به جای نام فیلدها استفاده کنم تا به وسیله یک حلقه تکرار تمام اطلاعات این فیلد ها رو تو جداول مورد نظر ارسال کنه
دوستان لطفا راهنمائی کنید وگرنه مجبور می شم برای حدود 100 تا فیلد دونه دونه کدهای تکراری بنویسم:ناراحت::افسرده:
اگر نظر بهتری هم دارید لطفا دریغ نفرمایید


ممنون از راهنمائیتون

[emami.sie]

با سلام
فرض کنیم 12 لیبل روی فرم هست که می خواهیم فرمتشون مطابق با دستور زیر عوض بشه: (دقت کنید: نام لیبل ها باید Label1 و Label2 و ... باشد)
Dim i As Integer
For i = 1 To 12
Me("Label" & i).ForeColor = 0
Me("Label" & i).FontUnderline = False
Next i

و یا برای استفاده در رکوردست و با استفاده از حلقه: .Fields(4) = CDbl(Me("M" & i))

می تونید از کدهای فوق الگوبرداری بفرمایید...
موفق باشید
یا علی