Query all Data

[whojstall11]

I have a search form that filters data by using combo boxes from a query. It works perfect but when you enter in specific criteria, that value comes up and ALL Null criteria too. I only want null seen when form has no criteria in the comboboxes.

Like [Forms]![frmHardwareUpdateSearch]![DeviceType] & "*" Or Is Null

this is what one of the fields looks like in my query

[Rawb]

Dim strQuery As String

strQuery = "SELECT * FROM MyTable WHERE "

If Len([Forms]![frmHardwareUpdateSearch]![DeviceType] & vbNullString) = 0 Then
  strQuery = strQuery & "[DeviceType] Is Null"
Else
  strQuery = strQuery & "[DeviceType] Like '" & [Forms]![frmHardwareUpdateSearch]![DeviceType] & "*'"
End If