Fråga : Ta fram att applådera som är combo, boxas

Jag har använt applådera comboboxes flera tider, men kan inte få till och med detta problem.  Pröva förmiddag I att ha en bilda väljer anslå reviderar vid egenskapen, och year.

I har en tblProperty med PropertyID (PK), PropertyNameShort, och ProjectStatusID
I har tblPropertiesAudits med PropertyAuditID (PK-autonumber), PropertyID, och ValidDate

So min egenskap bordlägger ska har data som ser lika:
PropertyID PropNameShort ProjectStatus
15 som den min gröna gatan 9

and reviderar, bordlägger ska har data som ser lika:
PropertyAuditID PropertyID giltiga Date
25 15 12/31/2008
26 15 12/31/2009

In bildatitelraden av mitt bildar frmPropAuditMaster som jag har combo två boxas ifrågasätter in: cboPropertySelect och cboAuditYEarSelect

The ror källan för cboPropertySelect är:

SELECT tblProperty.PropertyID, tblProperty.PropNameShort, tblProperty
WHERE för tblProperty.ProjectStatusID
FROM (((tblProperty.ProjectStatusID) =4 eller (tblProperty.ProjectStatusID) =9 eller (tblProperty.ProjectStatusID) =10 eller (tblProperty.ProjectStatusID) =11))
ORDER VID tblProperty.PropNameShort;

With den destinerade kolonnuppsättningen till ”1” eller PropertyID

I har försökt allsköns att närma sig pröva för att få min cboAuditYearSelect att uppdatera efter valet av egenskapen--den bör visa att det tillgängligt reviderar för den utvalda property.
For example, mig tänkte det using efter rokällan för cboPropertySelect skulle arbete som kombineras med”: Me.cboAuditYearSelect.Requery " i afterupdaten av
SELECT tblPropertiesAudits.PropertyAuditID, tblPropertiesAudits.PropertyID, tblPropertiesAudits
WHERE för cboPropertySelect (ledar- de combo boxas), för tblPropertiesAudits.ValidDate
FROM (((tblPropertiesAudits.PropertyID) = [Forms]! [frmPropAuditMaster]! [cboPropertySelect])); förmiddagen för


I en nybörjare, så där är något som är enkel mig, missförstod antagligen.  Tacka you.

" klar "

Svar : Ta fram att applådera som är combo, boxas

först du kan ändra rowSourcen av cboPropertyselect med denna kortare version

VÄLJ tblProperty.PropertyID, tblProperty.PropNameShort, tblProperty.ProjectStatusID
FRÅN tblProperty
VAR tblProperty.ProjectStatusID i (4.9.10.11)
BESTÄLLA VID tblProperty.PropNameShort

i afterUpdatehändelsen av cboPropertyselect förlägga detta kodifierar

privat undercboPropertyselect_afterupdate ()
Me.cboAuditYearSelect.rowsource= " VALD tblPropertiesAudits.PropertyAuditID, tblPropertiesAudits.PropertyID, tblPropertiesAudits.ValidDate FRÅN tblPropertiesAudits var PropertyID= " & me.cboPropertySelect

avsluta suben