فصل ۱۰ — Linked Listها و Controlهای وابسته

Fancy SkipLabels سه ComboBox پویا دارد: LabelRpt، FldToSearch و ValueToFind. انتخاب Report تعیین می‌کند چه Fieldهایی قابل Search باشند و انتخاب Field تعیین می‌کند چه Unique Valueهایی در Control سوم ظاهر شوند.

Event Chain

Private Sub Form_Load()
   Call UpdateLabelRptCombo
   Call UpdateFldToSearchCombo
   Call UpdateValueToFindCombo
End Sub

Private Sub LabelRpt_AfterUpdate()
   Call UpdateFldToSearchCombo
   Call UpdateValueToFindCombo
End Sub

Private Sub FldToSearch_AfterUpdate()
   Call UpdateValueToFindCombo
End Sub

Requery بین Formها

اگر NewCust در Customers Record تازه ایجاد کند، ComboBox فرم Orders باید Requery شود. Control روی Form دیگر با Identifier کامل Requery می‌شود.

If CurrentProject.AllForms("Orders").IsLoaded Then
   Forms![Orders]![CustID].Requery
End If

باز کردن New Record

DoCmd.OpenForm "NewCust", acNormal, , , acFormAdd

AfterInsert در NewCust زمان مطمئنی برای Update List فرم Orders است. IsLoaded مانع Error در صورت بسته بودن Orders می‌شود.

شکل‌ها و عناصر بصری این بخش