Clear button for multiple combo boxes

[Chansen]

I have a form with mulitple combo boxes that populates criteria in a query. I want to add a button to clear the selections in all of the combo boxes. What code do I use?

Thanks!

[KiwiGenie]

This is what I have used:

Private Sub CommandClear_Click()
Me.FiltRecName = Null
Me.FiltCat = Null
Me.FiltCost = Null
Me.FiltIng1 = Null
Me.FiltIng2 = Null
End Sub

Hope it helps :)

[ADezii]

I have a form with mulitple combo boxes that populates criteria in a query. I want to add a button to clear the selections in all of the combo boxes. What code do I use?

Thanks!

Dim ctl As Control

For Each ctl In Me.Controls
  If ctl.ControlType = acComboBox Then
    ctl.Value = Null
  End If
Next

[KiwiGenie]

Thanks for showing a better way ADezii, my way works but yours is better. Can I do this:

Dim ctl As Control

For Each ctl In Me.Controls
  If ctl.ControlType = acComboBox or ctl.ControlType = acTextBox Then
    ctl.Value = Null
  End If
Next

[Chansen]

Thanks it works great!! =)