ش | ی | د | س | چ | پ | ج |
1 | 2 | 3 | 4 | |||
5 | 6 | 7 | 8 | 9 | 10 | 11 |
12 | 13 | 14 | 15 | 16 | 17 | 18 |
19 | 20 | 21 | 22 | 23 | 24 | 25 |
26 | 27 | 28 | 29 | 30 |
Form.Filter Property
Use the Filter property to specify a subset of records to be displayed when a filter is applied to a form, report, query, or table. Read/write String.
از ویژگی Filter برای ذخیره یک فیلتر و بکار بردن آن در زمان دیگری استفاده کنید . فیلترها با اشیاء در جایی که ساخته شده اند ذخیره می شوند . آنها بصورت خودکار زمانیکه شئ مثل فرم باز می شود بارگذاری می شود اما بصورت خودکار اعمال نمی شوند.
عبارتی که می دهد بدون Where است می توانید سابفرم را فیلتر کنید و عبارت پراپرتی فیلتر آنرا در متغیری ذخیره کنید و نمایش آنرا در قالب Msgbox یا در TextBox ببینید
Me.Filter="Country='USA'"
Me.FilterOn=True
Dim Form As Form
Set Form = Forms("fmClientLogDtls2")
Subform.Form Property
Use the Form property to refer to a form or to refer to the form associated with a subformcontrol. Read-only Form.
برای رجوع به فرم یا فرم مرتبط با کنترل سابفرم از ویژگی Form استفاده کنید.
پس طبق گفته بالا برای استفاده ازکنترل سابفرم باید به پراپرتی فرم اشاره کرد و بعد نام کنترل
مثال : رجوع به مقدار ذخیره شده ( پراپرتی Value بعد از رفتن فوکوس به جای دیگر مقدار میگیرد ) کنترل MyTextBox در ( کنترل ) سابفرم با نام SubformControl4 که در سابفرم ۳ قرار گرفته و ۳ در ۲ و ۲ در MySubformControlName ... خلاصه سابفرم در سابفرم است بشتابید !!!
Forms(“MainFormName”). Controls(“MySubformControlName“). Form.Controls(“SubformControl2”). Form.Controls(“SubformControl3”). Form.Controls(“SubformControl4”). Form.Controls("MyTextBox").Value
Controls.Count Property
Use the Count property to determine the number of items in a specified collection. Read-only Long.
Forms("Form1").Controls.Count
شماره ایندکس از صفر شروع میشود پس باید Count-1 شود.
ایندکس می تواند تغییر کند ( مثلا در حذف جدول و دوباره ایجاد کردن با همان نام ) پس بهتر است نام فرم ذکرشود