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

[hadgph]

سلام

برای فیکس شدن اتوماتیک مقادیر در داخل تکست باکسهای گزارش اکسس کد زیر رو پیدا کردم ولی دقیقا نمیدونم باید به چه شکلی و کجا باید ازش استفاده کنم و اصن مفید هست یا نه:افسرده:



Select Case Len(me.myfield)
Case < 12
Me.myfield.Properties("FontSize") = 16
Case < 14
Me.myfield.Properties("FontSize") = 14
Case < 16
Me.myfield.Properties("FontSize") = 12
Case < 18
Me.myfield.Properties("FontSize") = 11
Case < 20
Me.myfield.Properties("FontSize") = 10
Case < 22
Me.myfield.Properties("FontSize") = 9
Case < 24
Me.myfield.Properties("FontSize") = 8
Case Else
Me.myfield.Properties("FontSize") = 8
End Select



دوستان می تونن راهنمایی کنن؟

[hf.farhadi]

با سلام
نمونه ضمیمه از همین سایت میباشد