What do you mean by "does not clear CboSubMechanism"? Are you saying that
CboSubMechanism still has a row selected in it, or are you simply that
CboSubMechanism still has content?

To unselect from CboSubMechanism, use

Me!CboSubMechanism = Null

To ensure CboSubMechanism has no data in it, use

Me!CboSubMechanism.RowSource = vbNullString
Me!CboSubMechanism.Requery

--
Doug Steele, Microsoft Access MVP
http://www.AccessMVP.com/DJSteele
(no e-mails, please!)

"Joe" wrote in message
...
Hi -

I have a subform with two combos CboMechanism with row source =
TblMechanism
and CboSubMechanism dependent on selection in CboMechanism using the
following code in CboMechanism Afer Update event...

Private Sub CboMechanism_AfterUpdate()
On Error Resume Next
Select Case CboMechanism.Value
Case "7"
CboSubMechanism.RowSource = "tbl_SubMechEquipt"
Case "9"
CboSubMechanism.RowSource = "tbl_SubMechFall"
Case "10"
CboSubMechanism.RowSource = "tbl_SubMechLift"
Case "11"
CboSubMechanism.RowSource = "tbl_SubMechParachute"
Case "14"
CboSubMechanism.RowSource = "tbl_SubMechSlip"
Case "16"
End Select
This works well when the cases are selected but does not clear
CboSubMechanism when a non-case selection is made.

I tried adding CboSubMechanism.RowSource = "tbl_SubMechMTA" in the After
Update but it doesn't really resolve the problem. I've tried requerying
in
after update event without it resolving the issue.

I would be grateful for any guidance offered.
--
Joe