make a form that shows all records, (continuous form)
in the header put a combo box that has all states.
a text box for zip codes.
when user selects a state in the combo, filter the records to see only those records.
below is the code to do this:
Code:
sub cboState_Afterupdate()
if isNull(cboState) then
me.filterOn = false
else
txtZip = null
me.filter = "State='" & cboState & "'"
me.filterOn = true
end if
end sub
'vb for zip code box
Code:
sub txtZip_Afterupdate()
if isNull(txtZip) then
me.filterOn = false
else
cboState = null
me.filter = "ZipCode='" & txtZip & "'"
me.filterOn = true
end if
end sub