Won't bother you, Bob. I review your sample again and found what the problem of my inquiry form is. It is okay now. thanks!
If Not IsNull(Me.cboSelectModel) Then
stWhere = "[Model]='" & Me.cboSelectModel & "' And "
blnTrim = True
End If
If Not IsNull(Me.cboSelectWarehouse) Then
stWhere = stWhere & "[WarehouseID]=" & Me.cboSelectWarehouse & " And "
blnTrim = True
End If
If Not IsNull(Me.cboSelectModel) Then
stWhere = "[Model]='" & Me.cboSelectModel & "' And "
blnTrim = True
End If
If Not IsNull(Me.cboSelectWarehouse) Then
stWhere = stWhere & "[WarehouseID]=" & Me.cboSelectWarehouse & " And "
blnTrim = True
End If